从周和年中提取月份

Question

我有一个数据框，其中使用lubridate提取了星期和年份。我没有日期值了。

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

df
Week    Year  
   1    2018
   5    2018
  45    2017

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

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

Answer 1

这将提取一周中第一天的月份，如果需要，则可以添加一个常数或其他内容。

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