slideshareから情報をとってくるパッケージを作りました

ちょっと探したけど無かったのでslideshareから情報をとってくるパッケージを作りました。
developer登録をするとAPIkeyとsharedsecretが手に入るのでそれを使ってください。

devtools::install_github("dichika/slideshare")

key <- "Your APIkey"
secret <- "Your sharedsecret" 

library(slideshare)
test <- Slideshare$new(apikey=key,sharedsecret=secret)
res <- test$getSlideshow("http://www.slideshare.net/dichika/r25lt")
res$NumViews

もちろんyeahパッケージにも対応しています。

library(yeah)
yeah("slideshare")

とりあえずIDとURLでデータをとってこれるようにしていますが、他のメソッド（get_slideshows_by_userとか）はおって実装します。たぶん。