R - 洗牌保留元素大小的列表

Question

在R中，我需要一个有效的解决方案来洗牌列表中包含的元素，保留元素的总数和本地元素的大小（在这种情况下，列表中的每个元素是一个向量）

a<-LETTERS[1:6] 
b<-LETTERS[6:10] 
c<-LETTERS[c(9:15)] 

l=list(a,b,c) 
> l 
[[1]] 
[1] "A" "B" "C" "D" "E" "F" 

[[2]] 
[1] "F" "G" "H" "I" "J" 

[[3]] 
[1] "I" "J" "K" "L" "M" "N" "O" 

的洗牌应随机选择列表中的字母（无需更换），并把它们在列表中的任何载体的随机位置。

我希望我已经清楚！感谢:-)

Answer 1

，你可以尝试重新创建第二列表与第一的骨架，并与第一列表中的所有元素，这样的填充：

u<-unlist(l) 
l2<-relist(u[sample(length(u))],skeleton=l) 
> l2 
[[1]] 
[1] "F" "A" "O" "I" "S" "Q" 

[[2]] 
[1] "R" "P" "K" "F" "G" 

[[3]] 
[1] "A" "N" "M" "J" "H" "G" "E" "B" "T" "C" "D" "L" 

希望这有助于！

Answer 2

这样子......？

> set.seed(1) 
> lapply(l, sample) 
[[1]] 
[1] "B" "F" "C" "D" "A" "E" 

[[2]] 
[1] "J" "H" "G" "F" "I" 

[[3]] 
[1] "J" "M" "O" "L" "N" "K" "I"