R列入Matrix

Question

我正在处理一个列表，其中我已经拆分了字符串，因此每个元素可以有不同的数字拆分字符。我希望这是一个矩阵，如果缺少字符，则应该为空。

 test_data <- cbind(c("laptop", "lenovo", "apple watch", "fitbit", "app radio", "lock"), c("10", "5", "100", "25", "2", "2"))

 tester <- strsplit(test_data[,1],"")

print (tester)

[[1]]
[1] "l" "a" "p" "t" "o" "p"

[[2]]
[1] "l" "e" "n" "o" "v" "o"

[[3]]
[1] "a" "p" "p" "l" "e" " " "w" "a" "t" "c" "h"

[[4]]
[1] "f" "i" "t" "b" "i" "t"

[[5]]
[1] "a" "p" "p" " " "r" "a" "d" "i" "o"

[[6]]
[1] "l" "o" "c" "k"

我试过了：

 matrix( tester , ncol = (max(nchar(test_data[,1]))) , byrow = TRUE )

但是这个结果并不是我想要的。

      [,1]        [,2]        [,3]         [,4]        [,5]        [,6]        [,7]        [,8]        [,9]         [,10]      
[1,] Character,6 Character,6 Character,11 Character,6 Character,9 Character,4 Character,6 Character,6 Character,11 Character,6
  [,11]      
  [1,] Character,9

这是所需输出的第一行：

      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]  [,9]  [,10] [,11]      
  [1,] "l"  "a"   "p"  "t"  "o"  "p"  NA NA NA NA NA