小编et_*_*et_的帖子

我有一个matrix包含两个级别分组的矩阵，如行名和列名所示。

           UKC1_SS1   UKC1_SS2   UKC2_SS1   UKC2_SS2
UKC1_SS1       1          2          3          4
UKC1_SS2       5          6          7          8
UKC2_SS1       9         10         11         12
UKC2_SS2      13         14         15         16

我想根据列名和行名的前四位数字创建一个包含列和行总和的表：

      UKC1   UKC2   
UKC1    14     22  
UKC2    46     54  

我尝试计算rowsums并按colSums顺序，

sum.matrix <- rowsum(matrix, substr(rownames(matrix), start = 1, stop = 4))
sum.matrix <- colSums(sum.matrix, substr(colnames(test), start = 1, stop = 4)

但我收到以下错误消息： colSums(test, substr(colnames(test), start = 1, stop = 4)) 错误：'na.rm' 参数无效

当我运行时，sum(is.na)我确认matrix.