#Préparer les données
env.z <- subset(env.z, select = -das) # Enlever la variable "distance from the source" 
 
#Faire la RDA
?rda
spe.rda <- rda(spe.hel~., data=env.z)

### Extraire les résultats
summary(spe.rda, display=NULL) 
 
#Les résultats peuvent être vus en utilisant summary():
summary(spe.rda, display=NULL) #display = NULL optional