將周。年轉換為年。月-R中的日期

Question

我想在ISO 8601中將日期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"