1

新しいベクトルごとにランダムなサンプルを選択するように、ベクトルを 2 つに分割するにはどうすればよいですか。しかし、私はいつも半分に分けたいと思っています。例えば

x <- 1:10
obj <- splitMyVector(x)

obj$a
 > 5 3 9 7 10
obj$b
 > 8 4 1 6 2

注: これの目的は、半分の信頼性を実現することです。

4

1 に答える 1

4
split(sample(x),letters[seq(length(x))%%2+1])
$a
[1]  9  7 10  4  2

$b
[1] 6 1 8 3 5
于 2012-07-19T14:04:06.560 に答える