当存在2个图例时,如何更改图例点的大小

时间:2017-04-06 13:58:13

标签: r ggplot2

我有一个图表,其中有两个图例。我需要改变其中一个传说的点数。

enter image description here

我需要更改"市场类型"的子弹大小。在传说中。我使用示例here但不适用于我的图表。

我的代码如下:

k <- ggplot(subsetdf) + theme_bw() +
  geom_point(      aes(y=y, x=x, size =Total.Unit.Count, fill = region), shape=21)+

  scale_colour_hue(aes(y=y, x=x),l=50) + # Use a slightly darker palette than normal

  geom_text_repel (aes(y=y, x=x, label = rownames(subsetdf))) +
  geom_smooth(aes(x=x, y=y),method=lm,   # Add linear regression lines
  se=FALSE)  +
  labs(y = "title", x = "title",
       title = "title",
       size = "size", fill = "fill")+
  theme(plot.title = element_text (face = 'bold',size = 21,hjust = 0.5),
        legend.text = element_text(size = 16),
        legend.title = element_text(size = 18),
        axis.title.x = element_text(size=20),
        axis.title.y = element_text(size=20),
        axis.text.x = element_text(size = 18,angle=45, hjust=1),
        axis.text.y = element_text(size = 18,hjust = 1),
        panel.grid.major = element_blank(),
        panel.grid.minor = element_blank())+
        scale_size_continuous(range = c(3,8))+
  guides(colour = guide_legend(override.aes = list(size=10)))

1 个答案:

答案 0 :(得分:2)

您使用的是fill美学指南,而不是color。这就是要覆盖的guide

以下是iris数据集的示例,因为您的代码不可重现。

library(ggplot2)

ggplot(iris) +
    geom_point(aes(Sepal.Length, Petal.Length, size = Sepal.Width, fill = Species), shape = 21) +
    guides(fill = guide_legend(override.aes = list(size=8)))