私は非常に単純なことのように見えることを達成するために1日以上費やしてきました。300の「ランダム」シーケンスを作成する必要があります。この場合、1、2、3、および4の数字はすべて正確に12回表示されますが、同じ数字が「連続して」2回続けて使用されることはありません。
私の最善の試み(私は推測)は:
置換なしのRサンプル48アイテムを持ち、rleで連続値があるかどうかをテストしてから、連続値を含まないシーケンスのみを使用します。問題:この基準を満たすランダムシーケンスはほとんどないため、時間がかかります。
Rに連続値のないシーケンスを作成させます(コードを参照)。
pop<-rep(1:4,12)
y=c()
while(length(y)!=48)
{
y= c(y,sample(pop,48-length(y),replace=F))
y=y[!c(FALSE, diff(y) == 0)]
}
問題:これにより、各値の数が異なるシーケンスが作成されます。次に、各値がちょうど12のシーケンスのみを使用しようとしましたが、問題1に戻るだけでした。
これを行う簡単な方法がいくつかあるに違いありませんよね?どんな助けでも大歓迎です!