# NOT RUN {
##data(iris)
X = iris[,1:4]
Y = iris[,5]
names(Y)=rownames(X)
random_seq=sample(nrow(X))
split_rate=3
split_sample = suppressWarnings(split(random_seq,1:split_rate))
Train_X = X[-random_seq[split_sample[[1]]],]
Train_Y = Y[-random_seq[split_sample[[1]]]]
CV_result = DF_CV(Train_X, Train_Y)
# }
Run the code above in your browser using DataLab