第 30 章 ggplot2之控制图例的外观

前面ggplot2章节，我们知道美学映射和相应的标度函数可以同时调整图形的效果和图例的外观。但有时候，我们只想改变图例的外形，并不想影响图形的效果。

本章首先介绍使用guide_legned()中的override.aes的缘由（让图例更具有可读性，或者构建某种组合图例的效果），然后给出三个应用场景。

在画散点图的时候，我们可能会设置点的透明度和大小，比如alpha = 0.5和size = 1，这种方法在点的量很大的时候是比较有用的，但也会导致图例中的点比较淡和小，比如下图（这里点的数量不算多，只是为了演示如何修改图例而设定的参数）

这个时候，为了强图例的可读性，可以让图例中点的变大以及减少透明度。guides() 函数提供了 scale name - guide 对方便用户修改，比如我们想修改color标度对应的图例，可以这样写 guide(color = guide_legend(override.aes = ____ ))， 这里override.aes 可接受size、shape等美学参数，然后覆盖（override）默认的图例外观。

对刚才的图形，我们提供size = 3给 override.aes

可以看到图例中的点，变大了。

R总是让一件事情，可以有好几种方法完成。上面的效果还可以在scale_*()函数里完成。比如，我们手动设置scale_color_manual()让三种企鹅分别有不同的颜色，然后把上面guide()里guide_legend()的代码复制过来

除了传递size到override.aes，还可以传递更多参数，装到list()里打包一起就行

override.aes还有一个用途是，删除图例中一部分美学映射。比如，这里有一个数据集points，points 的id变量有3个分组，

我们经常在画了散点图后会增加一个拟合曲线，

但为了把图中的信息说明地更清楚点，比如哪些是原始观测值，哪些是拟合直线，就需要增加一个图例。

具体思路，是把一个都没用的美学属性映射成常数，这样会形成一个新的图例，然后再修改这个图例，把图例中的符号弄成想要的。

接下来，我们演示选取两个图层共有的一个美学参数（不是真正使用它），然后映射到一个新图例，最后为这个新的图例赋予清晰的图例符号。

我这里保留上图中color的图例，同时增加第二个图例，目的是指明图中的“点”是观测值， “线条”是拟合值。

当我们增加一个额外的图例的时候，我们会借用图层中没有使用的美学元素，比如透明度alpha，但我们的本意不是用 alpha 影响图形外观，而是在后面会添加scale_alpha_manual()语句，并让values = c(1, 1)，两组都为1，也就说并不增加每个图层的透明度，随后可以删除图例名(legend name )，并设置breaks的顺序，让图例中 Observed 组为顺序第一个。

我们现在有了一个新的图例了，但是发现在这个新图例中仍然是点线的符号，因此，我们需要采用上一节的方法，重写当前的图例符号，让 Observed 只有点的符号，而 Fitted 只有线条符号

当然也可以写在scale_alpha_*()里

最后一个例子，是控制多个图例的外观，刚开始可能有点难以理解。

但是，我们看到图中点并没有填充颜色，这是是因为默认的点的形状是不可填充颜色的，因此，我们使用scale_shape_manual()修改点的类型。

现在图中的点有了填充色，但图例 g1中没有显示每组的填充色，原因还是在于图例默认的形状也是不可填充颜色的形状。因此，我们还需要修改图例中的点的类型，让它变成可填充颜色的类型。方法同上节，在guides() 图层中使用 scale name-guide 对，然后把点的shape传递给override.aes。

最后，为了更加美观，还可以修改shape图例g2的填充色为黑色。