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 functioncran_downloads()
. Works the same, but returns a data frame showing the adjusted downloads, adjusted total downloads, shared minimum downloads, and package update information.
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()