if (FALSE) { # identical(Sys.getenv("NOT_CRAN"), "true")
mrIML_rf <- mrIML::mrIML_bird_parasites_RF
mrIML_rf_boot <- mrIML_rf %>%
mrBootstrap(num_bootstrap = 50)
mrIML_rf_PD <- mrPdPlotBootstrap(
mrIML_rf,
mrIML_rf_boot,
target = "Plas",
global_top_var = 4
)
head(mrIML_rf_PD[[1]])
mrIML_rf_PD[[2]]
}
Run the code above in your browser using DataLab