extractFromModel0: Internal function to extrac objects from lists returned by...
In mopa: Species Distribution MOdeling with Pseudo-Absences

Internal function to extract values returned by function mopaTrain

1 2	extractFromModel0(models, value = c("model", "auc", "kappa", "tss", "fold.models", "ObsPred"))

`models`	Object returned by `mopaTrain`.
`value`	Any character of the following: "model", "auc", "kappa", "tss", "fold.models", "ObsPred"

ObsPred allows to calculate further accuracy measures.

Depending on the specified value:

`model`	fitted model using all data for training
`auc`	AUC statistic in the cross validation
`kappa`	kappa statistic in the cross validation
`tss`	true skill statistic in the cross validation
`fold.models`	fitted model with partitioned data
`ObsPred`	Observed and prediced (cross model prediction) values