【R】webスクレイピングの超基礎

webスクレイピング用のライブラリrvestを使って、
取引所FXなどを展開する東京金融取引所のホームページから
清算価格を取得してみたいと思います。

取引所のホームページからは様々な取引データが取得できるため、
金融の分析などに使用できることも多いと思います。

#webスクレイピングライブラリ
library(rvest)
#ファイル出力用
library(readr)

#東京金融取引所のホームページを取得します
html <- read_html("https://www.tfx.co.jp/")
#divで、クラスが「chart_cel_03」のタグを取得します
div <- html_nodes(html,"div.chart_cel_03")
#テキストを取得します
text <- html_text(div)
#16番目がドル円の清算価格です
price <- as.numeric(text[16])
#priceテキストに追記して出力していきます
write_lines(price,"price.txt",append=T)

price.txtに昨日の清算価格が出力されました。

110.095