Я анализирую атм экологических данных, поэтому мне нравится составлять график CCA, который содержит информацию о сайтах, spp и данных переменных среды. А также раскраска geom_text, связанная с сайтами и spp отдельно? Есть ли коды, позволяющие мне сделать это в ggplot2?
Я пытался добавить два geom_text (переменные spp и sites) в одну фразу кодов, но это не сработало, как я ожидал, поскольку geom_text из этих двух переменных перекрывает друг друга. А потом я попытался добавить цвета в geom_text отдельно, но это тоже не сработало. Я попытался построить график с помощью функции auto_plot в ggvegan, мне нравится график так, как он ориентирует цвета и размер слова графика, но тексты перекрывались.
ggplot() +
geom_point(aes(x=CCA1, y=CCA2), data=filter(vare_tbl, ccatype=="species"))+ geom_text_repel(aes(x=CCA1, y=CCA2, label=vgntxt, size=3.5),
data=vare_tbl, seed=123) +
geom_text_repel(aes(x=CCA1, y=CCA2, label=vgntxt, size=3.5),
data=vare_sam_tbl, seed=123)+
geom_segment(aes(x=0, y=0, xend=CCA1, yend=CCA2), arrow=arrow(length = unit(0.2,"cm")),
data=filter(vare_tbl, ccatype=="bp"), color="blue") +
coord_fixed() +
scale_colour_manual(values = c("blue", "black"))+ #this code isn't working
theme_classic() +
theme(legend.position="none")
##Autoplot function of ggvegan
autoplot(cca2, arrows = TRUE, geom = "text", legend = "none")
Я получил коды для построения графика биплота из https://blogs.ncl.ac.uk/mep/2018/04/08/reproducible-publication-quality-multivariate-plots-in-r/.
И я получил коды для раскраски geom_text из https://ggplot2.tidyverse.org/reference/geom_point.html,, сделав так, чтобы коэффициент (цил) не работал для меня.
