如何在 R 中删除每第 n 列的多列?

Jst*_*ion 4 r

所以我有一个未指定列数的数据框(我所知道的是至少有 4 列)。

我想要做的是,对于每 4 列,我想删除第 3 列和第 4 列。

假设我的数据框包含 12 列。在这种情况下,我想删除第 3、4、7、8、11、12 列。

我知道我可以每隔 n 列删除一列,如下所示:

df <- df[,seq(2,ncol(df),4)]
Run Code Online (Sandbox Code Playgroud)

但是如何使用 R 以相同的方式删除第三列和第四列呢?

谢谢。

akr*_*run 5

由于这些是索引,因此用于-删除这些列

i1 <- rep(seq(3, ncol(df), 4) , each = 2) + 0:1
df[,-i1]
Run Code Online (Sandbox Code Playgroud)

或者另一种选择是使用逻辑索引来回收

df[!c(FALSE, FALSE, TRUE, TRUE)]
Run Code Online (Sandbox Code Playgroud)

数据

set.seed(24)
df <- as.data.frame(matrix(rnorm(12 * 4), 4, 12))
Run Code Online (Sandbox Code Playgroud)