將列表矩陣（每個長度爲1）轉換爲常規矩陣，保留尺寸

Question

因此，我似乎收到了一些錯誤的數據，並且我想將數據提取到更可用的狀態，因爲計算需要一天的時間跑。目前我有一個列表矩陣，其中每個列表只包含1個數字。是否有可能從列表中刪除每個值到具有相同維度的矩陣？這是輸出結果的表示。

filler = 0 
for(j in 1:2){ 
    for(i in 1:10){ 
     filler[i] <- as.list(i) 
    } 
    if(j == 1){ 
     final <- filler 
    }else{ 
     final <- cbind(final,filler) 
    } 
} 
final <- data.matrix(final) 

這裏是輸出的樣子

> final[1,1] 
$final 
[1] 1 

> final 
     final filler 
[1,] 1  1  
[2,] 2  2  
[3,] 3  3  
[4,] 4  4  
[5,] 5  5  
[6,] 6  6  
[7,] 7  7  
[8,] 8  8  
[9,] 9  9  
[10,] 10 10 

Answer 1

列表（每個長度爲1）final的矩陣可以被轉換爲使用

matrix(unlist(final), nrow = nrow(final), dimnames = dimnames(final)) 

unlist返回一個正常的矩陣數字矢量，然後使用原始矩陣的行數和dimnames將其轉換爲新矩陣。