将week.year转换为R中的year.month -日期

Question

我想将week.year ("44.2016")转换为year.month (2016-11)

我有一个变量date_week <- "44.2016"

我试过这个：

as.Date(date_week, format = "%U.%Y")

as.Date(date_week, format = "%W.%Y")

我得到的结果是："2016-02-21"

我也试过这个：

as.Date(date_week, format = "%w.%Y")

as.Date(date_week, format = "%w.%Y")

结果：NA

我希望得到这样的结果："2016-11"

谢谢你的帮助！

Answer 1

请注意，您需要指定一天，因为一周可能意味着连续两个月。试试这个：

as.Date(paste("1", date_week, sep = "."), format = "%w.%W.%Y") # 1st day (monday 31 oct 2016)
as.Date(paste("2", date_week, sep = "."), format = "%w.%W.%Y") # 2nd day (Tuesday 01 nov 2016)
# new format 
format(as.Date(paste("1", date_week, sep = "."), format = "%w.%W.%Y"), "%Y-%m")
# [1] "2016-10"
format(as.Date(paste("2", date_week, sep = "."), format = "%w.%W.%Y"), "%Y-%m")
# [1] "2016-11"