# -----------------------------------------------------------------
# How to split train test dataset in R
# -----------------------------------------------------------------
# load the library
library(corrgram)
library(mlbench)
library(caret)
# load the data
data(iris)
DataSet <- as.data.frame(iris)
dim(DataSet)
sapply(DataSet, class)
# Pre-Processing of DataSet i.e. train : test split
train_test_index <- createDataPartition(DataSet$Species, p=0.67, list=FALSE)
training_dataset <- DataSet[train_test_index,]
testing_dataset <- DataSet[-train_test_index,]
# dimention of train test dataset
dim(training_dataset)
dim(testing_dataset)