Create your own
inTrain <- sample(MyDT[, .I], floor(MyDT[, .N] * .75))
Train <- MyDT[inTrain]
Test <- MyDT[-inTrain]
Or with Caret, you can just wrap trainingRowswith c ().
trainingRows<-createDataPartition(DT$variable, p=0.75, list=FALSE)
Train <- DT[c(trainingRows)]
Test <- DT[c(-trainingRows)]
===
Edit Matt was about to add a comment, but too long.
, sample(.I,...) . , ( ) .I , 1:nrow(DT). , R sample() . . sample(nrow(DT)) , .I. . ?sample.
, , . .
, :
inTrain <- sample(MyDT[, .I], floor(MyDT[, .N] * .75))
:
inTrain <- MyDT[,sample(.N, floor(.N*.75))]