extract_results: Extract and format the results produced by the workflow

In courtiol/rangeRinPA: Protected Area Personnel and Ranger Numbers are Insufficient to Deliver Global Expectations

Extract and format the results produced by the workflow

Description

Extract and format the results produced by the workflow

Usage

extract_results(
  list_results_LMM = list(),
  list_results_RF = list(),
  data = NULL
)

extract_results_internal(what, who, type, data)

Arguments

list_results_LMM	a list of objects produced by run_LMM_workflow()
list_results_RF	a list of objects produced by run_RF_workflow()
data	a dataset with info on continents if breakdown by continent is required (optional)
what	an object produced by run_LMM_workflow() or run_RF_workflow()
who	the type of staff ("rangers", "others" or "all")
type	the type of workflow ("LMM" or "RF")

Functions

• extract_results_internal(): an internal function fetching the results

Examples

## Not run: 
LMM_small_test <- run_LMM_workflow(data = data_rangers, Ncpu = 2, coef = 1,
                                   rep_feature_select = 2, rep_finetune = 2, rep_simu = 2)

RF_small_test <- run_RF_workflow(data = data_rangers, Ncpu = 2, coef = 1,
                                 rep_feature_select = 2, rep_finetune = 2, rep_simu = 2,
                                 grid_type = "coarse",
                                 n_trees = 100)

extract_results(list_results_LMM = list(LMM_small_test),
                list_results_RF  = list(RF_small_test)) %>%
  tidyr::unnest_wider(PA_areas)

plot_features_selected(list_results_LMM = list(LMM_small_test),
                       list_results_RF  = list(RF_small_test), data = data_rangers)


## End(Not run)

courtiol/rangeRinPA documentation built on Sept. 29, 2022, 9:54 a.m.