Status
lines of R code: 316, lines of test code: 199
Development version
0.1.3 - 2017年03月22日 / 21:09:01
Description
The 'http://stats.grok.se' server provides data and an 'API' for Wikipedia page view statistics from 2008 up to 2015. This package provides R bindings to the 'API'.
License
GPL (>= 2)
Peter Meissner [aut, cre], R Core Team [ctb]
Citation
citation("statsgrokse")BibTex for citing
toBibtex(citation("statsgrokse"))Installation
Stable version from CRAN:
install.packages("statsgrokse")Latest development version from Github:
devtools::install_github("petermeissner/statsgrokse")
The workhorse of the package is the wp_trend() function:
library(statsgrokse) pageviews <- statsgrokse( page = "Edward_Snowden", from = "2013年06月01日", to = "2013年07月31日", lang = c("en","de") ) ## http://stats.grok.se/json/en/201306/Edward_Snowden ## http://stats.grok.se/json/en/201307/Edward_Snowden ## http://stats.grok.se/json/de/201306/Edward_Snowden ## http://stats.grok.se/json/de/201307/Edward_Snowden
pageviews <- pageviews[order(pageviews$lang, pageviews$date), ] par(mfrow=c(1,2), oma = c(0, 0, 1, 0)) with( pageviews, { plot(date[lang=="en"], count[lang=="en"], type="l", xlab = "date", col="#183691") plot(date[lang=="de"], count[lang=="de"], type="l", xlab = "date", col="#183691") } ) mtext("API Pageviews", line=-2, outer = TRUE, cex = 1.5) par(mfrow=c(1,1), oma=c(0,0,0,0))
