Here's the same functionality in R. Guess who finishes first and takes the afternoon off?
library(readr) library(dplyr) library(ggplot2) df = read_csv('release_data.csv') %>% arrange(Date) %>% mutate(days = Date - lag(Date)) p = ggplot(df, aes(x = Date, y = days)) + geom_col(color = '#008080') + scale_x_date(date_minor_breaks = '1 year') + labs(title = "Days since last SQLite release") ggsave("days_since_last_sqlite_release.svg", plot = p, device = 'svg', width = 12, height = 7)
Here's the same functionality in R. Guess who finishes first and takes the afternoon off?