将多个相等尺寸矩阵与单个矩阵与每个单元格组合的单元格值是r的列表，作为r的输入矩阵的值

Question

输入： 相同维度有三个输入矩阵 3输入矩阵：

              GeneA             GeneB          
GeneA          31                  4           
GeneB           5                  8 

              GeneA             GeneB          
GeneA           5                 14           
GeneB           5                  8 


              GeneA             GeneB          
GeneA          30                 14           
GeneB           45                 7 

输出：

                GeneA             GeneB          
GeneA          {31,5,30}         {4,14,14}          
GeneB          {5,5,45}           {8,8,7} 

一个具有单元格值的矩阵作为输入矩阵值的列表。

Answer 1

您可以使用mapply，然后将结构和dimnames分配为matrix1

matrix(
  mapply(paste, matrix1, matrix2, matrix3, MoreArgs=list(sep=",")), 
  nrow=nrow(matrix1),
  ncol=ncol(matrix1),
  dimnames = dimnames(matrix1)
)

output的dimnames：

      GeneA     GeneB    
GeneA "31,5,30" "4,14,14"
GeneB "5,5,45"  "8,8,7"  

Answer 2

您需要将每个结果向量保存在矩阵中的列表中。如果您的矩阵被称为M1，M2和m3，那么您可以做：

m <- `dimnames<-`(matrix(lapply(1:4, function(i) c(m1[i], m2[i], m3[i])), 2),
                  dimnames(m1))

以便我们有

m
#>       GeneA     GeneB    
#> GeneA integer,3 integer,3
#> GeneB integer,3 integer,3

：

m[1, 1]
#> [[1]]
#> [1] 31  5 30