我试图通过删除每第三列来减小数据框的大小。
这是我的示例数据框：
example = data.frame(x=c(1,2,3,4), y=c(1,2,3,4), z=c(1,2,3,4), w=c(1,2,3,4), p=c(1,2,3,4), q=c(1,2,3,4), r=c(1,2,3,4))
看起来像这样
x y z w p q r
1 1 1 1 1 1 1
2 2 2 2 2 2 2
3 3 3 3 3 3 3
4 4 4 4 4 4 4
我想把它转换成这样的东西
x y w p r
1 1 1 1 1
2 2 2 2 2
3 3 3 3 3
4 4 4 4 4
我已经能够使用 tidyverse 减少行数：
example <- example %>% …我有几个计数变量矩阵，我们可以表示如下：
P <- matrix(c(1, 2 ,0, 2, 5, 1, 0, 6, 1), nrow = 3)
Q <- matrix(c(1, 0, 0, 2, 3, 1, 0, 4, 1), nrow = 3)
R <- matrix(c(2, 1, 1, 5, 6, 4, 0, 4, 1), nrow = 3)
S <- matrix(c(9, 7, 5, 4, 7, 3, 2, 6, 3), nrow = 3)
我想创建将这些矩阵相加的所有组合。例如。P+Q、P+R、P+S、Q+R、Q+S、R+S、P+Q+R、P+R+S、P+Q+S、Q+R+S...
我知道如何手动运行它：
PQ <-P+Q
> PQ
[,1] [,2] [,3]
[1,] 2 4 0
[2,] 2 8 10
[3,] 0 2 2
PQR <- …