將日期轉換為季節

Question

如何更改游戲季節的特定日期范圍？ 例如：我的數據幀d $ Date的日期介於'08 / 08/15'和'05 / 05/16'之間，但我想將所有這些日期更改為特定的季節'2015/16'。 此外，'08 / 08/14'和'05 / 05/15'之間的日期應該是'2014/15'什么樣的代碼可以實現這一目標？

Answer 1

試試這個......讓我知道它是否有幫助？

    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包是你的朋友：

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