knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/images/README-" )
adjustedcranlogs is a wrapper around the cranlogs package that removes CRAN-wide shared daily downloads and re-download/CRAN mirror spikes due to package updates.
# To install: install.packages("adjustedcranlogs") # To install developmental version: # install.packages("devtools") devtools::install_github("tylermorganwall/adjustedcranlogs")
adj_cran_downloads()
Wrapper around cranlogs function cran_downloads()
. Works the same, but returns a data frame showing the adjusted downloads, adjusted total downloads, shared minimum downloads, and package update information.set.seed(2)
library(adjustedcranlogs) library(ggplot2) library(dplyr) library(lubridate) mypkgdownloads = adj_cran_downloads("skpr",from = "2017-08-15", to = "2017-11-15") mypkgdownloads %>% ggplot() + geom_line(aes(x=date,y=adjusted_total_downloads)) + geom_line(aes(x=date,y=total_downloads),color="red",linetype="dashed") + annotate("text",y=400,x=dmy("01-10-2017"),label="Raw Downloads",color="red") + annotate("text",y=50,x=dmy("20-10-2017"),label="Adjusted Downloads",color="black") + theme_minimal()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.