# Loading a model prediction
pred <- terra::rast(system.file("extdata", "proj_out_wmean.tif",
package = "enmpa"))
# Simulated data
test <- runif(100, min = 0.3, max = 0.8)
# partial ROC calculation
pr <- proc_enm(test, pred, threshold = 5, sample_percentage = 50,
iterations = 500)
Run the code above in your browser using DataLab