元ネタ記事
久しぶりにR-Bloggersの最新記事を見ていたらキャッチーなタイトル記事が挙がっていたので記載されていたコードを眺めてみました。
機能としては、目立ったものはないですが、ダウンロード数の期間の設定とかが容易にできるし、コードが直感的に触れる感じが良さそう。
install.packages("cranlogs") #初めて使う人はインストールが必要 library(cranlogs) library(ggplot2) #可視化に使用
今回は自分が開発・メンテしているパッケージのダウンロード数を分析してみます。
FlickrAPI_downloads <- cran_downloads(packages="FlickrAPI", from = "2019-01-01", to = Sys.Date()-1) #期間は今年の初めから head(FlickrAPI_downloads)
date count package 68 2019-01-01 0 FlickrAPI 69 2019-01-02 0 FlickrAPI 70 2019-01-03 0 FlickrAPI 71 2019-01-04 0 FlickrAPI 72 2019-01-05 0 FlickrAPI 73 2019-01-06 0 FlickrAPI
ggplot(FlickrAPI_downloads, aes(date, count)) + geom_line(colour = "red",size=1) + xlab("Time") + ylab("No. of downloads") + labs(title = paste0("FlickrAPI daily downloads ", Sys.Date()-1))
ダウンロード数がもっとも多かった10日を表示
library(tidyverse) FlickrAPI_downloads %>% arrange(desc(count)) %>% head(10)
date count package 1 2019-01-31 94 FlickrAPI 2 2019-01-30 67 FlickrAPI 3 2019-04-02 24 FlickrAPI 4 2019-03-27 18 FlickrAPI 5 2019-03-08 17 FlickrAPI 6 2019-03-28 17 FlickrAPI 7 2019-02-12 16 FlickrAPI 8 2019-02-04 15 FlickrAPI 9 2019-02-20 14 FlickrAPI 10 2019-02-25 14 FlickrAPI
リリース直後のダウンロード数が94と67でもっとも多かったみたいです。
その次の4月2日には下記のツイートでステッカーを貼ったタイミングのようです。
FlickrAPI has now its own package sticker!!!!https://t.co/mkQVvBDfvc#rstats #FlickrAPI
— Andy Ⅱ (@ko25and) April 2, 2019
designed by Japanese designer Keita Kouga (@_pilecks) pic.twitter.com/kHPnSGzwmV
1日平均ダウンロード数
mean(FlickrAPI_downloads$count, na.rm = TRUE)
[1] 7.979381
直感的に触れるパッケージなので参考になりましたし、毎日平均では約8ダウンロードもされているみたいなので今後とも頑張ってアップデートしていきます。