各製品の資料を入手。
詳細はこちら →製品をチェック
OneNote のデータをR で分析:JDBC での接続
CData JDBC Driver で標準的なR 関数とお好みの開発環境を使ってOneNote を分析。
加藤龍彦デジタルマーケティング
最終更新日:2023-09-21
この記事で実現できるOneNote 連携のシナリオ
こんにちは!ウェブ担当の加藤です。マーケ関連のデータ分析や整備もやっています。
CData JDBC Driver for OneNote とRJDBC package を使って、R でリモートOneNote データ を利用できます。CData Driver を使うことで、業界が認めた基準で書かれたドライバーを活用して、オープンソースでポピュラーなR 言語のデータにアクセスできます。この記事では、ドライバーを使ってOneNote にSQL クエリを実行する方法、および標準R 関数を呼び出してOneNote をビジュアライズする方法について説明します。
R をインストール
マルチスレッドのMicrosoft R Open を実行すること、またはBLAS/LAPACK ライブラリにリンクされたオープン R を実行することによって、マルチスレッドおよびマネージドコードから利益を得られたドライバーのパフォーマンスにマッチできます。ここでは、Microsoft R Open 3.2.3 を使用します。CRAN レポジトリのJan. 1, 2016 snapshot からパッケージをインストールするために事前設定されています。このsnapshot は再現性を保証します。
RJDBC パッケージをロード
ドライバーを使うにはRJDBC パッケージをダウンロードします。RJDBC パッケージをインストールしたら、次のコードを入力してパッケージをロードします。
library(RJDBC)
JDBC データソースとしてOneNote に接続
下記の情報を使いOneNote にJDBC データソースとして接続します。
- Driver Class:cdata.jdbc.onenote.OneNoteDriver に設定。
- Classpath:Driver JAR の場所を設定します。デフォルトではインストールディレクトリの[lib]サブフォルダです。
dbConnect やdbSendQuery のようなDBI 関数は、R にデータアクセスコードを書くための統一インターフェースを提供します。
driver <- JDBC(driverClass = "cdata.jdbc.onenote.OneNoteDriver", classPath = "MyInstallationDir\lib\cdata.jdbc.onenote.jar", identifier.quote = "'")
これで、DBI 関数を使ってOneNote に接続しSQL クエリを実行する準備が整いました。dbConnect 関数を使ってJDBC 接続を初期化します。一般的なJDBC 接続文字列は次のとおりです。
conn <- dbConnect(driver,"OAuthClientId=MyApplicationId; OAuthClientSecret=MySecretKey; CallbackURL=http://localhost:33333;")
OneNote は、Oauth 認証標準を使います。事前にアプリを作成し、OAuthClientId、OAuthClientSecret、CallbackURLuses の値を取得します。詳細はヘルプドキュメントを参照してください。
スキーマ Discovery
ドライバーはOneNote API をリレーショナルデータベース、ビュー、ストアドプロシージャとしてモデルします。次のコードを使ってテーブルリストを検出します。
dbListTables(conn)
SQL クエリの実行
dbGetQuery 関数を使ってOneNote API がサポートするすべてのSQL クエリを実行できます:
notebooks <- dbGetQuery(conn,"SELECT Id, notebook_displayName FROM Notebooks WHERE Id = 'Jq74mCczmFXk1tC10GB'")
次のコマンドを使って、結果を[data viewer]ウィンドウで見ることができます。
View(notebooks)
OneNote データ をプロット
CRAN レポジトリで利用可能なあらゆるデータ初期化パッケージを使ってOneNote を分析する準備が整いました。ビルトインバーのplot 関数を使って簡単なバーを作成できます。
par(las=2,ps=10,mar=c(5,15,4,2)) barplot(notebooks$notebook_displayName, main="OneNote Notebooks", names.arg = notebooks$Id, horiz=TRUE)
