子集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]