Calculating Cumulative Sum Over Rolling Date Range in R with dplyr and tidyr