SOAL NO 10 UTS DATMIN

library(mlbench)

## Warning: package 'mlbench' was built under R version 4.4.3

data("BreastCancer")
library(caTools)

## Warning: package 'caTools' was built under R version 4.4.3

# Bersihkan data
data_clean <- na.omit(BreastCancer)

# Set seed
set.seed(110)

# Manual split
index <- sample(1:nrow(data_clean), size = 566)
train_data <- data_clean[index, ]
test_data <- data_clean[-index, ]

# Cek hasil
nrow(train_data)  # 566

## [1] 566

nrow(test_data)   # 117

## [1] 117