R/take_train_sample.R

Defines functions take_train_sample

take_train_sample <- function(main_data, porcent = 0.8) {
  num_rows <- nrow(main_data)
  train <- sample(1:num_rows, porcent * num_rows)
  return(train)
}
GerryLarios/combofitness documentation built on Sept. 3, 2020, 12:01 a.m.