r - 改变 R 中 split() 的输出格式

Question

假设我有以下拆分:

x <- 1:5
K <- 2
y <- 5

split(sample(x), sample(1:K, y, replace = TRUE))
$`1`
[1] 3

$`2`
[1] 5 1 2 4

有没有办法将以上内容放入表单

      [, 1] [, 2]
 [1, ]    3     5
 [2, ]          1
 [3, ]          2
 [4, ]          4

Answer 1

您可以使用 length<- 用 NA 填充这些空元素那么对于 sapply 的结果来说将是完美的.

a <- split(sample(x), sample(1:K, y, replace = TRUE))
a
# $`1`
# [1] 2 3
#
# $`2`
# [1] 5 1 4

sapply(a, "length<-", max(lengths(a)))
#       1 2
# [1,]  2 5
# [2,]  3 1
# [3,] NA 4