r - 是否有任何 r 函数可用于将两个 geom_text 添加在一起并进行不同的着色？

Question

我正在分析生态数据 atm，所以我想绘制一个 CCA 图，其中包含有关站点、spp 和环境变量数据的信息。并且还分别为与站点和 spp 相关的 geom_text 着色？是否有任何代码可以让我在 ggplot2 中这样做？

我曾尝试在单个代码短语中添加两个 geom_text（spp 和站点变量），但由于这两个变量中的 geom_text 相互重叠，因此效果不如我预期。然后我确实尝试单独为 geom_text 添加颜色，但它也不起作用。我尝试使用 ggvegan 的 auto_plot 函数绘制图形，我喜欢图形的颜色和文字大小，但文本是重叠的。

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/获得了绘制双标图的代码。

我从https://ggplot2.tidyverse.org/reference/geom_point.html获得了为 geom_text 着色的代码，这样做因子（cyl）不适合我。

标签： rggplot2vegan