从周数和年数中提取月份

Extract Month from Week and Year number

我有一个数据框,我在其中使用 lubridate 提取了周数和年数。我没有日期值了。

我想从周数和年数中提取月份。

df
Week    Year  
   1    2018
   5    2018
  45    2017

我希望我的最终输出是这样的:

Week    Year  Month
   1    2018      1
   5    2018      2
  45    2017     11

这会提取一周的第一天的月份,如果您想要一周的第 2 天或第 3 天,您可以添加一个常量或其他内容。

df %>% 
  mutate(Month = month(ymd(Year * 10000 + 0101) + Week * 7))