powered by
getSeason(DATES)
# my.dates <- as.Date("2011-12-01", format = "%Y-%m-%d") + 0:60 # getSeason(my.dates)
Run the code above in your browser using DataLab