season(1, lang = "en")
season(as.Date("2017-01-01"))
seasonally(as.Date(c("2017-12-01", "2018-01-01", "2018-02-01")))
is.full_season(as.Date(c("2017-12-01", "2018-01-01", "2018-02-01", "2018-03-01")))
Run the code above in your browser using DataLab