はてなブックマークAPIをRから叩く

GETで持って来れるので別に難しい話ではない。
が、また使いたくなったときに調べるのが面倒なのでパッケージにした。

install_github("dichika/hatenab")
library(hatenab)
# もっとも古い日付と最新の日付からURLを作成
dates <- seq(as.Date("2010-02-10"),as.Date("2015-01-22"), by=1)
dates <- format(dates, "%Y%m%d")
urls <- sprintf("http://d.hatena.ne.jp/dichika/%s/p1", dates)

# はてブAPIを叩く
result <- getBookmarkCount(urls)
result <- result[order(result$count, decreasing=TRUE),]
head(result, 20)

Rpubsの記事も大正に加えた例をRpubsに上げた。
http://rpubs.com/dichika/hatenab

enjoy!!!