子集xts，对象在R中

Question

必须有一个简单的解决方案，但不知何故我找不到它。我希望按年（简单）对xts对象进行子集化，但是使用另一个对象。

data <- xts(1:1000, Sys.Date()+1:1000)
data['2016',]  # this will give all 2016 data

现在我想这样做：

year <- as.numeric(2016)
data['year',]

显然这不起作用。任何帮助非常感谢

Answer 1

您需要一个character对象：

year <- "2016"
data[year]