如何从 data.table 中排除一列或将 data.table 转换为 MTS

Question

当使用data.table 时，是否可以返回除一列之外的所有列，例如data.frame？

如果答案是否定的，是否有人有一种优雅的方式将多个时间序列 data.table 转换为 zoo 或其他时间序列对象？

考虑以下示例：

library(data.table)
library(zoo)

## DEFINE DATA
set.seed(1)
dt = data.table(
    mydates = as.Date("2012-01-01") + 1:9, 
    value1 = sort(rpois(9, 6)),
    value2 = sort(rpois(9, 6)),
    value3 = sort(rpois(9, 6)),
    value4 = sort(rpois(9, 6)),
    value5 = sort(rpois(9, 6)))

## CONVERT TO DATA FRAME
df = as.data.frame(dt)

## CONVERT TO ZOO
zooObj = zoo(df[,-1], df$mydates)

## EXAMPLE OF DESIRED RESULTS
plot(zooObj, col=1:ncol(zooObj))

如果没有df = as.data.frame(dt)，我该怎么做？

Answer 1

以前的答案有效，但这里是更新方法的答案：

## CONVERT TO ZOO

#### old method
zooObj = zoo(x=dt[,-1,with=FALSE], order.by=dt$mydates)

#### alternatives
zooObj = zoo(x=dt[,!'mydates'], order.by=dt$mydates)
zooObj = zoo(x=dt[,-'mydates'], order.by=dt$mydates)

#### and if column name is a variable
myvar = 'mydates'
zooObj = zoo(x=dt[,!..myvar], order.by=dt[[myvar]])
zooObj = zoo(x=dt[,-..myvar], order.by=dt[[myvar]])

作为扩展，如果您想从 data.table 中删除多个列，请尝试以下操作之一：

dt[,-c('value1', ..myvar)]
dt[, .SD, .SDcols = !c('value1', (myvar))]

Answer 2

试试with=FALSE：

dt[,-1,with=FALSE]

---

顺便说一句，功能请求 #416 是相关的：

Add not join DT[-J(...)], and not columns DT[,-"colC",with=FALSE].