data <- tibble::tibble(
Feature1 = c(1, 2, NA, 4, 5),
Feature2 = c(NA, 2, 3, 4, NA),
Feature3 = c(1, NA, 3, NA, 5),
Metadata = c("A", "B", "C", "D", "E")
)
imputed_data <- handle_missing_values(
data,
threshold = 0.20,
imputation_method = "half_min",
metadata_cols = "Metadata"
)
print(imputed_data)
Run the code above in your browser using DataLab