library(vegan)
library(ggplot2)
data(dune)
data(dune.env)
# Example with RDA
ord <- rda(dune)
scores_df <- as.data.frame(scores(ord, display = "sites"))
scores_df$Management <- dune.env$Management
ggplot(scores_df, aes(x = PC1, y = PC2, color = Management)) +
geom_point() +
barrel_label_axes(ord) +
theme_minimal() +
theme(axis.title = element_text(face = "bold", size = 13))
Run the code above in your browser using DataLab