从数据框中的日期列中抽象年份

Question

我有一个带日期列的数据框

date
2008-01-01
2008-01-02
2008-01-03
2008-01-04

如何创建仅包含这些日期年份的新列？

Answer 1

如果将数据框转换为数据表

df <- data.table(date = as.Date(c('2008-01-01', 
                                  '2008-01-02',
                                  '2008-01-03',
                                  '2008-01-04')))

您可以使用其漂亮的作业并使用stringr包来获得年份

library(stringr)
df[,year := str_match(date, '[0-9]{4}')[,1]]