# Load data
data("enm_data", package = "enmpa")
jk <- jackknife(data = enm_data,
dependent = "Sp",
independent = c("bio_1", "bio_12"),
user_formula = NULL,
cv = 3, response_type = "lpq")
jk
# plot JK's results
plot_jk(jk, metric = "TSS")
plot_jk(jk, metric = "ROC_AUC")
plot_jk(jk, metric = "AIC")
plot_jk(jk, metric = "Residual_deviance")
Run the code above in your browser using DataLab