R插入符号

X <-  data.frame(a = seq(1,16,by=2), b = LETTERS[1:8], x= month.abb[1:8], z=letters[1:8])

y <- 1:8

我想了解的是如何让createFolds始终如一地创建相同维度的折叠。 我举个例子:

set.seed(233)
folds <- createFolds(y, k = 2, list = TRUE, returnTrain = FALSE)

> folds
$Fold1
[1] 1 5 6 8

$Fold2
[1] 2 3 4 7

第二次并不是将数据均匀地拆分为折叠:

folds <- createFolds(y, k = 2, list = TRUE, returnTrain = FALSE)

> folds
$Fold1
[1] 1 2 5 7 8

$Fold2
[1] 3 4 6