Hatena::ブログ(Diary)

My Life as a Mock Quant このページをアンテナに追加 RSSフィード Twitter

2014-11-27

rvestでリアルタイムな為替レートを取得したい

| 19:04 | rvestでリアルタイムな為替レートを取得したいを含むブックマーク

USD/JPYレート、こんなんで取得OKでござんした。html関数以下を再実行すれば直近のレートに置き換わる。

#パッケージ読み込み&html取得
library(rvest)
html <- html("http://info.finance.yahoo.co.jp/fx/detail/?code=USDJPY=FX")
#BID, ASK取得
bid <- html %>% html_node('#USDJPY_detail_bid') %>% html_text() %>% as.numeric()
ask <- html %>% html_node('#USDJPY_detail_ask') %>% html_text() %>% as.numeric()
#出力
print(c(BID=bid, ASK=ask))

このrvestライブラリの使い方は、もっと勉強する必要がある。

参考