Odd download counts recently

[markfairbanks]

There's been a very large drop-off in downloads for pretty much every package - not sure if this is a cranlogs issue or something else 🤷‍♂️.

library(tidytable, w = FALSE)
library(data.table, w = FALSE)
library(cranlogs)
library(ggplot2)

cran_downloads(c("data.table", "dplyr"), from = "2020-01-01") %>%
  mutate.(year_month = yearmon(date),
          package = factor(package)) %>%
  summarize.(avg_daily_downloads = sum(count)/n(),
             .by = c(package, year_month)) %>%
  ggplot() +
  aes(x = year_month, y = avg_daily_downloads, color = package) +
  geom_point() +
  geom_line()