# Example: Using PFI
wrap_object <- preprocessing(
df = sim_data,
formula = psych_well ~ depression + life_sat,
task = "regression"
)
wrap_object <- build_model(
analysis_object = wrap_object,
model_name = "Random Forest",
hyperparameters = list(
mtry = 2,
trees = 3
)
)
set.seed(123) # For reproducibility
wrap_object <- fine_tuning(wrap_object,
tuner = "Grid Search CV",
metrics = c("rmse")
)
wrap_object <- sensitivity_analysis(wrap_object, methods = "PFI")
# Extracting Results
table_pfi <- table_pfi_results(wrap_object)
Run the code above in your browser using DataLab