在iNEXT稀有版本的行尾添加标签

Question

尝试在稀有行的末尾添加标签（站点名称）。以下是对目标的引用：

以下是我尝试过的这段代码所得到的：

ggiNEXT(cc, type=1,color.var="site")
+ geom_text(aes(label = site, x = x, colour = site, y = y,hjust = -.09))
+ theme(legend.position="none")

我也尝试将x用作max（x），但这会将标签堆叠到正确的极限。我假设使用x（max）会有所帮助，但问题可能出在每个数据点的标签绘制上。理想情况下，一行必须有一个标签。

展望未来 谢谢您的期待