使用geom_bar和geom_point控制ggplot中的图例

我正在同一图上绘制条形图和折线/点图,并且试图具有两个图例,一个用于点,一个用于条。

但是,我最终得到3个图例(而不是2个图例),并且这些条的图例中都有点。你能帮助我吗?这是MWE

library("ggplot2")

df2 <- data.frame(Height=rep(c("low", "high"), each=3),
                  Month=rep(c("Jan", "Feb", "March"),2),
                  Trial =c(7, 4, 10, 2, 4, 12),
                  Success = c(2, 2, 7, 1, 3,  8))


ggplot(data=df2, aes(x=Month, y= Success, fill= Height)) +
  ggtitle("Title") +
  geom_bar(stat="identity", position=position_dodge()) +
  geom_line(aes(x=Month, y=Success/Trial*max(Success), group = Height, linetype = Height, colour = Height) , size = 3, alpha = 0.7) +
  geom_point(aes(x=Month, y=Success/Trial*max(Success), colour = Height), size = 11) +
  geom_text(aes(label=round(Success/Trial,2), x=Month, y=Success/Trial*max(Success)), color="white", size=3.5, fontface = "bold") +
  scale_y_continuous(sec.axis = sec_axis(~. *1/max(df2$Success) , name="Proporion of success")) +
  labs(x = "Month", y="#Success", fill = "Number of Success", colour = "Proportion of success") +
  scale_colour_manual(values=c('#909999','#E69000'))+
  scale_fill_manual(values=c('#099999','#069F00'))

输出图像

我尝试使用其他版本,guides(colour = FALSE, group = FALSE, fill = FALSE)但没有成功。我想删除“高度”图例,并删除“成功数”图例中的大黑点。

弗里克先生

由于要映射颜色,填充和线型,因此得到了三个分支。因此,您想关闭线型指南,并从填充图例中删除形状。你可以这样做

guides(
  linetype = FALSE, 
  fill = guide_legend(override.aes = list(shape = NA))
)

在此处输入图片说明

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

ggplot2:合并geom_line,geom_point和geom_bar的图例

如何在ggplot2中获取堆叠的geom_bar和geom_point的通用图例?

使用geom_point()和geom_line()进行多个系列的ggplot中的图例错误

使用正值和负值控制 ggplot::geom_bar position_stack 在图形和图例中的填充颜色顺序

geom_bar和geom_point条件颜色

ggplot2中带有geom_line和geom_point的图例

带有ggplot2和geom_point的图例

从图例中删除ggplot2的geom_point图标

ggplot图例(geom_point)中的空白条目?

从geom_bar图例ggplot r中删除点

使用不同的变量来绘制geom_bar和geom_point的颜色/填充点(分组图)

如何更改 ggplot geom_bar 中的条形名称和图例标题?

将geom_point覆盖到geom_bar。如何对齐点和条?

您可以在R中的geom_point图上组合geom_bar饼图吗?

geom_bar根据值使用geom_point颜色将数据分组

ggplot2-结合了geom_point和geom_line的图例

结合ggplot geom_point和geom_line图产生的冗余图例

如何将geom_bar,geom_point和geom_line合并为一个图形?

无法在 r 中使用 ggplot2 将组合 geom_point 和 _line 图的颜色和线型图例分开

ggplot2 geom_point alpha在图例中与图例不同

使用来自不同数据集的geom_point和geom_smooth添加图例

ggplot:geom_point中的颜色,填充和大小

ggplot方面和条件geom_point

填充地图上geom_point的ggplot2图例

ggplot2:将geom_line和geom_point组合在一起的图形中的坐标图例

带有 geom_line 和 geom_ribbon 和 geom_point 的图例

ggplot2-在(R)中使用geom_point()时出现图例问题

在ggplot2中更改geom_bar的图例键的形状

忽略ggplot中geom_bar和geom_histogram中的异常值