ベース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を使用して同じことをしたいです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 = "-") 

注：2016年1月1日は金曜日だったし、これはformat()であなたに0の週を与えるので、あなたは、2日間を追加する必要があります週は日曜日から始まります。

よろしく、
J_F