## Species (columns) need to be selected; call names() to get column numbers
names(schedenveg)
## Draw multiple species response curves on variable in black/white
specresponses(schedenveg[ ,c(9,18,14,19)], schedenenv$height_herb, bw = TRUE)
## Draw multiple species response curves on variable with
## custom x-axis label and lower df
specresponses(schedenveg[ ,c(9,18,14,19)], schedenenv$height_herb, df = 3,
xlab = "Height of herb layer (cm)")
## Draw multiple species response curves on ordination axes
## First calculate DCA
library(vegan)
scheden.dca <- decorana(schedenveg)
specresponses(schedenveg[ ,c(9,18,14,19)], scheden.dca, method = "ord")
specresponses(schedenveg[ ,c(9,18,14,19)], scheden.dca, method = "ord", axis = 2)
## Plot with manually log-transformed abundances
specresponses(log(schedenveg[ ,c(9,18,14,19)]+1), schedenenv$height_herb)
Run the code above in your browser using DataLab