set删除工作空间中所有数据框中的变量

Question

我有一个简单的问题，我在这里无法找到解决方案：

当我想从数据框中保留一系列变量时，变量将从我工作区中加载的数据框的所有副本中删除。

有没有办法只从一个数据框中删除它？

可重复的示例（仅从df而不是df2中删除它）？

require(data.table)

df <- structure(list(group = c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 3L, 3L, 3L), x = c(0L, 0L, 0L, 1L, 
1L, 1L, 1L, 0L, 0L, 0L, 0L, 0L, 0L, 1L, 1L, 1L, 0L, 1L, 1L), 
    time = c(1636L, 1637L, 1638L, 1639L, 1640L, 1641L, 1642L, 
    1683L, 1684L, 1685L, 1686L, 1687L, 1688L, 1689L, 1690L, 1691L, 
    1638L, 1639L, 1640L)), .Names = c("group", "x", "time"), class = "data.frame", row.names = c(NA, 
-19L))



df2 <- df


varstokeep <- c("group","x")
vartodrop <- which(!names(df)%in%varstokeep)
set(df, i=NULL, j=vartodrop, value=NULL)

原因是我有一个大文件，我用它作为多个（更多聚合）文件的基础。必须加载基本文件6次才会花费更多时间。