如何在ggplot2绘图中移除图例指定条目对应的线条或点标记

要实现不同图例条目分别显示点或线条，可通过guides()函数的override.aes参数自定义每个图例项的样式即可，修改后的完整绘图代码如下：

library(ggplot2)
library(tidypaleo)

ggplot(LGRSL, aes(x = mmsl , y = Age))+
  coord_flip()+
  theme_classic(12)+
  geom_point(data=tg1,aes(x=mmslc,y=Year,col="Fort Denison 1"),pch=1,size=2)+
  geom_point(data=tg2,aes(x=mmslc,y=Year,col="Fort Denison 2"),pch=1,size=2)+
  geom_lineh(data = full, aes(x=Lutregalammslc,y=Year,col="Full budget"))+
  scale_colour_manual(values=c("grey15","grey50","black")) +
  # 新增以下部分自定义图例样式
  guides(
    colour = guide_legend(
      override.aes = list(
        linetype = c(0, 0, 1), # 顺序对应三个图例项：前两个隐藏线条，第三个显示实线
        shape = c(1, 1, NA)    # 前两个显示空心圆点，第三个隐藏点标记
      )
    )
  )

参数说明 #

• 参数的向量顺序要和scale_colour_manual中定义的颜色对应的标签顺序一致，依次对应Fort Denison 1、Fort Denison 2、Full budget三个图例条目
• linetype = 0代表无线条，linetype = 1代表实线
• shape = NA代表不显示点标记

内容的提问来源于stack exchange，提问作者Sophie Williams