file <- system.file("external/model.sdm", package="sdm")
m <- read.sdm(file)
getModelInfo(m)
# getModelId(m)
# getModelId(m,method='brt')
obj <- getModelInfo(m, id=3) # obj is the fitted BRT model (through the package of gbm)
class(obj) # The class of the model object
summary(obj)
Run the code above in your browser using DataLab