将日期转换为季节

Question

How can I change a specific range of dates to the games' season? For illustration: my dataframe d$Date has dates between '08/08/15' and '05/05/16', however I want to change all those dates to the specific season '2015/16'. Furthermore the dates between '08/08/14' and '05/05/15' should be '2014/15' What line of code could accomplish this?

Answer 1

Try this... and let me know if it help?

    DF <- data.frame(matchDate = as.POSIXct(as.Date(sample(1000,100,replace=TRUE), origin="2000-01-01")))

years <- 1999:2016
DF$season <- cut(DF$matchDate, 
                 breaks=as.POSIXct(paste(years,"-01-01",sep="")),
                 labels=paste(years[-length(years)],years[-length(years)]+1,sep="/"))

Answer 2

lubridate package is your friend:

library(lubridate)
date <- c("08/08/15", "08/09/16")

# extract year information 
year <- year(mdy(date))
# paste season 
season <- paste0(year, "/", year + 1)
season