if (FALSE) {
# Example: Random split (80% train, 20% test) using iris data
data(iris)
splits <- hmda.partition(
df = iris,
train = 0.8,
test = 0.2,
seed = 2025
)
train_data <- splits$hmda.train
test_data <- splits$hmda.test
# Example: Stratified split (70% train, 15% test, 15% validation)
# using iris data, stratified by Species
splits_strat <- hmda.partition(
df = iris,
y = "Species",
train = 0.7,
test = 0.15,
validation = 0.15,
seed = 2025
)
train_strat <- splits_strat$hmda.train
test_strat <- splits_strat$hmda.test
valid_strat <- splits_strat$hmda.validation
}
Run the code above in your browser using DataLab