I am trying to learn how to deal with time series data. I created some fake daily data, tried to aggregate it by week and then plot it:
library(xts) library(g