# NOT RUN {
data(puechabon)
sahr <- puechabon$sahr
s <- sahrlocs2niche(sahr, used = "locs")
# 1. dudi.mix of the dataset
pc <- dudi.mix(s$tab, scannf = FALSE)
# 2. niche analysis
n <- niche(pc, s$y, scannf = FALSE)
plot(n)
# }
Run the code above in your browser using DataLab