R的新手，试图找出抽样批次

Question

我创建了一个基于我曾经玩过的Hearthstone套牌的R数据集，我试图尝试一个典型的起手牌，4张牌，100次，而对于我的生活，我无法弄清楚如何做到这一点。

RenoLock= c(0,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4,4,4,4,4,5,5,6,6,6,6,7,7,7,7)
count= table(RenoLock)
count
RenoLock
barplot(count)

我看过的每个地方都给了我一个类似于sample(RenoLock, 4:100, replace = TRUE, prob = NULL)的代码，但是，这只给了我4个结果。我试图得到100个结果，每个结果是4张卡。

Answer 1

如果你将size = 4的样本函数调用了100次，你可以像这样使用lapply。

lapply(rep(4,100),function(x){sample(RenoLock, size=x, replace = FALSE, prob = NULL)})