1
我有兩個矩陣的列數相同,但不同的行數:轉換兩個矩陣到使用列表應用
a <- cbind(runif(5), runif(5))
b <- cbind(runif(8), runif(8))
我想這些在同一個列表關聯,從而第一的a
和b
列相互關聯,等等:
my_result <- list(list(a[,1], b[,1]), list(a[,2], b[,2]))
所以結果是這樣的:
> print(my_result)
[[1]]
[[1]][[1]]
[1] 0.9440956 0.7259602 0.7804068 0.7115368 0.2771190
[[1]][[2]]
[1] 0.4155642 0.1535414 0.6983123 0.7578231 0.2126765 0.6753884 0.8160817
[8] 0.6548915
[[2]]
[[2]][[1]]
[1] 0.7343330 0.7751599 0.4463870 0.6926663 0.9692621
[[2]][[2]]
[1] 0.5708726 0.1234482 0.2875474 0.4760349 0.2027653 0.5142006 0.4788264
[8] 0.7935544
我不知道如何做到這一點沒有for
循環,但我很確定這裏可以使用一些*pply
魔法。
任何方向將不勝感激。