env.de<-dist(env.z, method = "euclidean") # matrice de distances euclidiennes des données env. standardisées
windows() # crée une nouvelle fenêtre graphique
coldiss(env.de, diag=TRUE)