如何避免NMDS图中标签的重叠？

Question

我试图通过使用ggrepel包来避免NMDS图中的标签重叠。起初我的代码是这样的：

result <- adonis(spiders~Wald, data = env, permutations=1000)
result1 <- metaMDS(spiders, distance = "bray", k = 2)
fit <- envfit(result1, env, perm = 1000)

fig<-plot(result1, type = "none")
points(fig, "sites", pch = as.numeric(env$Wald))
text(fig, "species", font=c(2), cex=c(0.75))
plot(fit, p.max = 0.05, col = "darkgrey", font=c(2), cex=c(0.75))
legend("topright", legend = c("Bestand A", "Bestand B", "Bestand C"),cex = 
c(0.75), pch = as.numeric(env$Wald))

我收到了这个情节

所以我稍微改变了我的代码

fig<-plot(result1, type = "none")
points(fig, "sites", pch = as.numeric(env$Wald))
geom_text_repel(fig, "species", font=c(2), cex=c(0.75))
plot(fit, p.max = 0.05, col = "darkgrey", font=c(2), cex=c(0.75))

但是我得到了这个

  

错误：ggplot2不知道如何处理类字符的数据。

我很乐意提供我的数据，以便更容易回答我的问题，但我不知道如何