ODBC 経由で R から au PAY Market のデータ を分析

純粋な R スクリプトと標準 SQL で au PAY Market のデータ にアクセスできます。CData ODBC ドライバ for au PAY Market と RODBC パッケージを使用すると、R からリモート au PAY Market のデータ を操作できます。CData ドライバを使用することで、業界で実績のある標準に準拠したドライバを活用し、人気のオープンソース言語 R でデータにアクセスできます。この記事では、ドライバを使用して au PAY Market のデータ に SQL クエリを実行し、R で au PAY Market のデータ を可視化する方法を説明します。

R をインストール

マルチスレッドや管理コードによるドライバのパフォーマンス向上は、マルチスレッド対応の Microsoft R Open や、BLAS/LAPACK ライブラリにリンクした R を実行することで補完できます。この記事では Microsoft R Open（MRO）を使用します。

au PAY Market にODBC データソースとして接続

au PAY Market への接続情報と、Windows および Linux 環境での DSN 設定手順を説明します。

au PAY マーケットに接続するには、ShopId およびApiKey が必要です。

au PAY マーケットへのアクセスの設定

ShopId およびApiKey を取得するには、以下の手順に従ってください。

• Wow! manager サイトにログインして、「各種お申し込み」メニューの「API利用申請」に移動します。
• API利用規約に同意します。
• 「APIキーの発行はこちら」をクリックします。
• 「発行」ボタンをクリックして、API キーを生成します。
• 「接続元IPアドレスを登録」に、対象とするIP アドレスを入力します。
• 「登録」ボタンをクリックして、設定を保存します。

au PAY マーケットアカウントの認証

次の接続プロパティを設定して接続します。

• ShopId：接続先のau PAY マーケットShop ID を設定。
• ApiKey：API キーを設定。au PAY マーケットストアアカウントから取得したAPI キーです。
• UseSandbox：Sandbox 環境に接続する場合はTrue を設定。

DSN を設定する際に、Max Rows 接続プロパティも設定することをお勧めします。これにより返される行数が制限され、レポートやビジュアライゼーションの設計時のパフォーマンス向上に役立ちます。

Windows

まだ設定していない場合は、ODBC DSN（データソース名）で接続プロパティを指定します。これはドライバーインストールの最後のステップです。Microsoft ODBC データソースアドミニストレーターを使用して、ODBC DSN を作成・設定できます。

Linux

Linux 環境で CData ODBC Driver for au PAY Market をインストールする場合、ドライバーのインストール時にシステム DSN が事前定義されます。システムデータソースファイル（/etc/odbc.ini）を編集して、必要な接続プロパティを定義することで DSN を変更できます。

/etc/odbc.ini

[CData auPAYMarket Source]
Driver = CData ODBC Driver for au PAY Market
Description = My Description
ApiKey = MyApiKey
ShopId = MyShopId

これらの設定ファイルの使用方法の詳細については、ヘルプドキュメント（インストール済みまたはオンライン）を参照してください。

RODBC パッケージを読み込む

ドライバを使用するには、RODBC パッケージをダウンロードします。RStudio で、［ツール］ -> ［パッケージのインストール］をクリックし、［パッケージ］ボックスに RODBC と入力します。

RODBC パッケージをインストールした後、以下の行でパッケージを読み込みます。

library(RODBC)

注意：この記事では RODBC バージョン 1.3-12 を使用しています。Microsoft R Open を使用すると、Microsoft の MRAN リポジトリのチェックポイント機能を使用して同じバージョンでテストできます。 checkpoint コマンドを使用すると、MRAN リポジトリでホストされている CRAN リポジトリのスナップショットからパッケージをインストールできます。2016年1月1日のスナップショットにはバージョン 1.3-12 が含まれています。

library(checkpoint)
checkpoint("2016-01-01")

au PAY Market のデータ にODBC データソースとして接続

以下の行で R から DSN に接続できます。

conn <- odbcConnect("CData auPAYMarket Source")

スキーマの検出

ドライバは au PAY Market API をリレーショナルテーブル、ビュー、ストアドプロシージャとしてモデル化します。以下の行でテーブルの一覧を取得できます。

sqlTables(conn)

SQL クエリを実行

sqlQuery 関数を使用して、au PAY Market API でサポートされている任意の SQL クエリを実行できます。

items <- sqlQuery(conn, "SELECT ItemCode, Price FROM Items", believeNRows=FALSE, rows_at_time=1)

以下のコマンドでデータビューアウィンドウに結果を表示できます。

View(items)

au PAY Market のデータ をプロット

これで、CRAN リポジトリで利用可能なデータビジュアライゼーションパッケージを使用して au PAY Market のデータ を分析できます。組み込みのバープロット関数を使用して、シンプルな棒グラフを作成できます。

par(las=2,ps=10,mar=c(5,15,4,2))
barplot(items$Price, main="au PAY Market Items", names.arg = items$ItemCode, horiz=TRUE)