我正在处理一个问题集，我被要求从一个非常大的矩阵 mA 中删除每 2 列和每 5 列
mA = matrix(rnorm(10000), nrow = 100, ncol = 100)
我可以很容易地弄清楚如何做其中一个，但我很难弄清楚如何同时做这两项。有人有什么想法吗？
答案 0 :(得分：0)
mA[,!(seq(ncol(mA)) %% 2 == 0 | seq(ncol(mA)) %% 5 == 0)]
答案 1 :(得分：0)
我们也可以
result <- mA[, -unique(unlist(lapply(c(2, 5), function(i) seq(1, ncol(mA), by = i))))]