# NOT RUN {
## this example is based on BIOMOD_Modeling function example
example(BIOMOD_Modeling)
## we will need ggplot2 package to produce our custom version of the graphs
require(ggplot2)
## plot evaluation models score graph
### by models
gg1 <- models_scores_graph( myBiomodModelOut,
by = 'models',
metrics = c('ROC','TSS') )
## we see a influence of model selected on models capabilities
## e.g. RF are much better than SRE
### by cross validation run
gg2 <- models_scores_graph( myBiomodModelOut,
by = 'cv_run',
metrics = c('ROC','TSS') )
## there is no difference in models quality if we focus on
## cross validation sampling
### some graphical customisations
gg1_custom <-
gg1 +
ggtitle("Diff between RF and SRE evaluation scores") + ## add title
scale_colour_manual(values=c("green", "blue")) ## change colors
gg1_custom
# }
Run the code above in your browser using DataLab