Как извлечь номер года и недели с использованием базы 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, как я могу сделать это в базе Р?

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 дня, потому что 1 января 2016 был пятница, и это даст вам неделю 0. В format() неделя начинается с воскресенья.

С уважением,
J_F