R：为 geom_text 使用单独的 df 会导致不需要的图例元素

问题描述

我在此处搜索了与此主题相关的所有可用帖子。我有一个带有“其他”行的数据框，我只想绘制前 5 个项目并将其他项目留在后面。现在我想在图中添加一个文本以显示其他人的价值。我的想法：将我的 df 子集化以绘制没有“其他”的行，然后使用 geom_text 中的 df 来获取这些值。我的列“K”有因子，K_Subset 只有 5 个级别（不包括其他）我的问题：一旦我添加 geom_text 图层，图例的顺序就会被打乱，而“其他”最终出现在图例中。我试过的：在 geom_text aes 中显示.legend，但没有用。

plot_K <-ggplot(data=K_subset,aes(x= K,y=T,fill=K)) +
  geom_bar(width=0.5,stat="identity") +
  labs(title = "Top 5",x = "K",y = "T")+
  geom_text(aes(label = T),position = position_dodge(width=1),vjust =-0.5,size=4)+
  geom_text(data= K_import,aes(label = paste("T=",sum(Ts)),y = 175,x = "S"),colour="black",size = 5)+
  geom_text(data=K_import,aes(label = paste("Other=",T[K=="Other"]),y = 165,size = 5)
plot_K

感谢您的帮助:)

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

geom-text ggplot2 legend r r