xts删除列名

Question

我有一个data.frame

res0 = structure(list(year = "2017", il = 11200000), .Names = c("year", 
"il"), row.names = c(NA, -1L), class = "data.frame")

但是，当我尝试将其设为xts对象时，我会丢失列名。

as.xts(x = res0[,2:ncol(res0)], order.by = as.POSIXct(paste0(res0$year,"-01-01")), name = NULL)

返回：

               [,1]
2017-01-01 11200000 

而不是

                 il
2017-01-01 11200000 

Answer 1

默认情况下，订阅R drop维度。使用drop = FALSE来阻止此操作。

res0[, 2:ncol(res0), drop = FALSE]

另请注意，这可以创建一个n x 1动物园系列，以年份为索引。

library(zoo)
z <- read.zoo(res0, FUN = c, drop = FALSE)