ENMTools

*

*

*

*

package dependencies

Package required but not available: ‘ENMeval’

See section ‘The DESCRIPTION file’ in the ‘Writing R Extensions’
manual.

*

*

*

*

*

*

examples

Running examples in ‘ENMTools-Ex.R’ failed
The error most likely occurred in:

> ### Name: enmtools.maxent
> ### Title: Takes an emtools.species object with presence and background
> ###   points, and builds a maxent model
> ### Aliases: enmtools.maxent
> 
> ### ** Examples
> 
> if(check.extras("enmtools.maxent")) {
+     ## maxent is not working on some platforms so use try()
+     try(enmtools.maxent(iberolacerta.clade$species$monticola, env = euro.worldclim))
+ }

 *** caught illegal operation ***
address 0x1065f2f78, cause 'illegal trap'

Traceback:
 1: rJava::.jcall(mxe, "S", "fit", c("autorun", "-e", afn, "-o",     dirout, "-s", pfn, args))
 2: .local(x, p, ...)
 3: maxent(x, p, ...)
 4: maxent(x, p, ...)
 5: .local(x, p, ...)
 6: dismo::maxent(raster::stack(env), p = analysis.df[analysis.df$presence ==     1, 1:2], a = analysis.df[analysis.df$presence == 0, 1:2],     ...)
 7: dismo::maxent(raster::stack(env), p = analysis.df[analysis.df$presence ==     1, 1:2], a = analysis.df[analysis.df$presence == 0, 1:2],     ...)
 8: withVisible(...elt(i))
 9: capture.output(this.mx <- dismo::maxent(raster::stack(env), p = analysis.df[analysis.df$presence ==     1, 1:2], a = analysis.df[analysis.df$presence == 0, 1:2],     ...))
10: enmtools.maxent(iberolacerta.clade$species$monticola, env = euro.worldclim)
11: doTryCatch(return(expr), name, parentenv, handler)
12: tryCatchOne(expr, names, parentenv, handlers[[1L]])
13: tryCatchList(expr, classes, parentenv, handlers)
14: tryCatch(expr, error = function(e) {    call <- conditionCall(e)    if (!is.null(call)) {        if (identical(call[[1L]], quote(doTryCatch)))             call <- sys.call(-4L)        dcall <- deparse(call, nlines = 1L)        prefix <- paste("Error in", dcall, ": ")        LONG <- 75L        sm <- strsplit(conditionMessage(e), "\n")[[1L]]        w <- 14L + nchar(dcall, type = "w") + nchar(sm[1L], type = "w")        if (is.na(w))             w <- 14L + nchar(dcall, type = "b") + nchar(sm[1L],                 type = "b")        if (w > LONG)             prefix <- paste0(prefix, "\n  ")    }    else prefix <- "Error : "    msg <- paste0(prefix, conditionMessage(e), "\n")    .Internal(seterrmessage(msg[1L]))    if (!silent && isTRUE(getOption("show.error.messages"))) {        cat(msg, file = outFile)        .Internal(printDeferredWarnings())    }    invisible(structure(msg, class = "try-error", condition = e))})
15: try(enmtools.maxent(iberolacerta.clade$species$monticola, env = euro.worldclim))
An irrecoverable exception occurred. R is aborting now ...

*

*