# NOT RUN {
# }
# NOT RUN {
library(rms)
data('ecospat.testData')
# data for Soldanella alpina
data.Solalp<- ecospat.testData[c("Soldanella_alpina","ddeg","mind","srad","slp","topo")]
# gbm model for Soldanella alpina
glm.Solalp <- glm(Soldanella_alpina ~ pol(ddeg,2) + pol(mind,2) + pol(srad,2) + pol(slp,2)
+ pol(topo,2), data = data.Solalp, family = binomial)
# p-values
ecospat.permut.glm (glm.Solalp, 1000)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab