# NOT RUN {
r = mlr_resamplings$get("subsampling")
# Default parametrization
r$param_set$values
# Do only 3 repeats on 10% of the data
r$param_set$values = list(ratio = 0.1, repeats = 3)
r$param_set$values
# Instantiate on iris task
task = mlr_tasks$get("iris")
r$instantiate(task)
# Extract train/test sets
train_set = r$train_set(1)
print(train_set)
intersect(train_set, r$test_set(1))
# Another example: 10-fold CV
r = mlr_resamplings$get("cv")$instantiate(task)
r$train_set(1)
# Stratification
task = mlr_tasks$get("pima")
prop.table(table(task$truth())) # moderately unbalanced
r = mlr_resamplings$get("subsampling")
r$instantiate(task)
prop.table(table(task$truth(r$train_set(1)))) # roughly same proportion
# }
Run the code above in your browser using DataCamp Workspace