xmin = seq(from = min(nrc_m$date), to = max(nrc_m$date), by = "2 years"), # every other year
xmax = seq(from = min(nrc_m$date) + months(12), to = max(nrc_m$date) + months(12), by = "2 years") # next year (for full year shading)
)
passed to geom_rect
xmin = seq(from = min(nrc_m$date), to = max(nrc_m$date), by = "2 years"), # every other year
xmax = seq(from = min(nrc_m$date) + months(12), to = max(nrc_m$date) + months(12), by = "2 years") # next year (for full year shading)
)
passed to geom_rect