set.seed(0)
# p has the predicted values for 50 known cases (locations)
# with presence of the phenomenon (species)
p <- rnorm(50, mean=0.6, sd=0.3)
# a has the predicted values for 50 background locations (or absence)
a <- rnorm(50, mean=0.4, sd=0.4)
e <- pa_evaluate(p=p, a=a)
e
e@stats
plot(e, "ROC")
plot(e, "TPR")
plot(e, "boxplot")
plot(e, "density")
str(e)
Run the code above in your browser using DataLab