如何使用基数R提取年份和周数？

Question

我有以下数据框：

id   created_at                   year_weak
 1     2016-01-01T12:11:03.383Z    2016-01
 2     2016-01-04T12:11:03.383Z    2016-01
 3     2016-01-06T12:11:03.383Z    2016-01
 4     2016-01-11T12:11:03.383Z    2016-02
 5     2016-01-12T12:11:03.383Z    2016-02

目前我有以下使用lubridate包的代码：

paste(year(as.Date(df$created_at)),week(as.Date(df$created_at)),sep = "-")

我想用基础R做同样的事情，我怎么能在Base R做呢？

Answer 1

以下内容适用于基本 R 命令：

year <- format(as.Date(df$created_at)+2, "%Y")
week <- format(as.Date(df$created_at)+2, "%U")

paste(year,week,sep = "-")

注意：您必须添加2天，因为2016年1月1日是星期五，这将给您一周的0.在format()周从星期日开始。

的问候，
J_F