我有一个向量，以及一个只有一列的数据框，其中包含长度不均的列表：
data = list(
c(349, 364, 393, 356, 357, 394, 334, 394, 343, 365, 349),
c(390, 336, 752, 377),
c(670, 757, 405, 343, 1109, 350, 372),
c(0, 0),
c(),
c(1115, 394, 327, 356, 408, 329, 385, 357, 357))
我想将其转换为矩阵，用填充空白NA。所以它应该看起来像这样：
349, 364, 393, 356, 357, 394, 334, 394, 343, 365, 349
390, 336, 752, 377, NA, NA, NA, NA, NA, NA, NA
670, 757, 405, 343, 1109,350, 372, NA, NA, NA, NA
0, 0, NA, NA, NA, NA, NA, NA, NA, NA, NA
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA
1115,394, 327, 356, 408, 329, 385, 357, 357, NA, NA
最终，即使仅使用摆脱行NAs。我试过了
data = sapply(data[,1], FUN=unlist)
接着
data = sapply(data, '[', seq(max(sapply(data, length))))
但我不断得到一列所有元素都未列出的矩阵。请指教。
我猜想'data'应该是alist而不是a vector，然后代码可以工作
t(sapply(data, `length<-`, max(lengths(data))))
注意：lengths是一种更快的选项（在最新的R版本中引入），它将替代sapply(data, length)
data = list(
c(349, 364, 393, 356, 357, 394, 334, 394, 343, 365, 349),
c(390, 336, 752, 377),
c(670, 757, 405, 343, 1109, 350, 372),
c(0, 0),
numeric(0),
c(1115, 394, 327, 356, 408, 329, 385, 357, 357))
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句