set.seed(123)
library(dplyr)
featured_col <- "cd_2022"
train_data <- viral %>%
dplyr::select(cd_2022, vl_2022)
test_data <- sero
rf_hyperparameters <- list(mtry = 2, min_n = 5, trees = 500)
threshold_value <- 0.99
# Call the function
Run the code above in your browser using DataLab