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