R：合並兩個相等大小的數組

Question

我確定這個問題一定很簡單，但是我在堆棧溢出時找不到類似的問題。 我希望合並array.A和array.B以便result是數組A和B的值的數組。

例如：

array.A <- array(1:9, dim=c(3,3))
array.B <- array(LETTERS[seq( from = 1, to = 9 )], dim=c(3,3))

> array.A
     [,1] [,2] [,3]
[1,]    1    4    7
[2,]    2    5    8
[3,]    3    6    9

> array.B
     [,1] [,2] [,3]
[1,] "A"  "D"  "G" 
[2,] "B"  "E"  "H" 
[3,] "C"  "F"  "I" 

我希望將它們合並，以使結果數組如下所示：

> result
     [,1]     [,2]     [,3]
[1,] ["A",1]  ["D",4]  ["G",7] 
[2,] ["B",2]  ["E",5]  ["H",8]
[3,] ["C",3]  ["F",6]  ["I",9]

我已經嘗試過使用cbind和rbind但這不是我想要的（我不是要連接數組）。 我似乎找不到簡單的解決方案。

提前致謝。

Answer 1

這不是一種典型的結構，但是您可以將list對象放在matrix或array ：

out <- array(Map(list, array.A, array.B), dim=dim(array.A) )
#     [,1]   [,2]   [,3]  
#[1,] List,2 List,2 List,2
#[2,] List,2 List,2 List,2
#[3,] List,2 List,2 List,2

out[1,1]
#[[1]]
#[[1]][[1]]
#[1] 1
#
#[[1]][[2]]
#[1] "A"

out[1,1][[1]][1]
#[[1]]
#[1] 1

out[1,1][[1]][2]
#[[1]]
#[1] "A"