r - 通过周数获取一年中的月份数

Question

我有一列包含一年中的星期数:

> merged.tables_d[,"Promo2SinceWeek"]
         Promo2SinceWeek
      1:              NA
      2:              NA
      3:              NA
      4:              NA
      5:              NA
     ---                
1017205:              22
1017206:              22
1017207:              22
1017208:              22
1017209:              22

例如，值22 应该是一年中的5 月份。所以结果应该是这样的:

> merged.tables_d[,"Promo2SinceWeek"]
             Promo2SinceWeek
          1:              NA
          2:              NA
          3:              NA
          4:              NA
          5:              NA
         ---                
    1017205:              5
    1017206:              5
    1017207:              5
    1017208:              5
    1017209:              5

请问我该怎么做？

Answer 1

我会使用 lubridate 库，这使得处理日期变得更容易。

library(lubridate)

创建虚拟数据:

Promo2SinceWeek <- c(1, 3, 22, 45, 52)
df <- data.frame(Promo2SinceWeek)

返回月份:

month(lubridate::ymd("2017-01-01") + lubridate::weeks(df$Promo2SinceWeek - 1))

并非 lubridate::ymd("2017-01-01") 指定您正在查看的一年中的第一周，在本例中为 2017。如果您的数据来自多年，我建议编写一个函数根据 df 中的另一列更改此值。