データパーティションをトレーニング、テスト、および検証に分割する - Rで分割する

Question

トレーニングデータを70％のトレーニング、15％のテスト、15％の検証に分割したいと考えました。私はキャレットパッケージのcreateDataPartition()機能を使用しています。私は、次の

train <- read.csv("Train.csv") 
test <- read.csv("Test.csv") 

split=0.70 
trainIndex <- createDataPartition(train$age, p=split, list=FALSE) 
data_train <- train[ trainIndex,] 
data_test <- train[-trainIndex,] 

のようにそれを分割しています以下のH2oアプローチのようなcreateDataPartition()を使用して、トレーニング、テストと検証に分割する方法はありますか？

data.hex <- h2o.importFile("Train.csv") 
splits <- h2o.splitFrame(data.hex, c(0.7,0.15), destination_frames = c("train","valid","test")) 
train.hex <- splits[[1]] 
valid.hex <- splits[[2]] 
test.hex <- splits[[3]] 

Answer 1

基地Rでsample()関数を用いる方法が

splitSample <- sample(1:3, size=nrow(data.hex), prob=c(0.7,0.15,0.15), replace = TRUE) 
train.hex <- data.hex[splitSample==1,] 
valid.hex <- data.hex[splitSample==2,] 
test.hex <- data.hex[splitSample==3,]