spe.pa<-decostand(spe, method="pa")