R语言ggplot2图例修改超详细介绍

更新时间：2022年11月03日 15:58:14 作者：医学和生信笔记

ggplot2是R语言最流行的画图包,基于图层化语法的思想设计和创建美观优雅的图形,下面这篇文章主要给大家介绍了关于R语言ggplot2图例修改的相关资料,需要的朋友可以参考下

前言

大家经常对ggplot2中的图例不满意，想要各种修改，今天就介绍下图例的各种修改细节，基本上常用的操作都涉及到了！

library(ggplot2)
library(gcookbook)

移除图例

提供3种方法可以在ggplot2中移除图例。

# 基本图形
pg_plot <- ggplot(PlantGrowth, aes(x = group, y = weight, fill = group)) +
  geom_boxplot()

pg_plot

plot of chunk unnamed-chunk-2

# 首先可以使用guides()函数移除图例
pg_plot +
  guides(fill = "none")

plot of chunk unnamed-chunk-3

然后可以在scale_**函数中移除，这里是fill，你要根据自己的情况换成shape、color等。

pg_plot+scale_fill_discrete(guide = "none")

plot of chunk unnamed-chunk-4

第3种方法是在theme中移除。

pg_plot+theme(legend.position = "none")

plot of chunk unnamed-chunk-5

改变图例位置

也是在theme中更改，

pg_plot <- ggplot(PlantGrowth, aes(x = group, y = weight, fill = group)) +
  geom_boxplot() +
  scale_fill_brewer(palette = "Pastel2")

pg_plot +
  theme(legend.position = "top") # 放在顶部

plot of chunk unnamed-chunk-6

legend.position的参数可以是left、right、top、bottom，还可以是坐标。

pg_plot+theme(legend.position = c(0.8,0.3))

plot of chunk unnamed-chunk-7

在ggplot2中，左下角的坐标是c(0,0)，右上角的坐标是c(1,1),你可以自己设置想要放置的位置。需要注意的是，你设置的这个坐标是图例中心点的坐标，可以通过legend.justification设置图例的哪个位置放在你的坐标上。

# 图例右下角，放在画布右下角
pg_plot +
  theme(legend.position = c(1, 0), legend.justification = c(1, 0))

plot of chunk unnamed-chunk-8

p <- ggplot(heightweight, aes(x=ageYear, y=heightIn, shape=sex, colour=sex))+geom_point()
p

plot of chunk unnamed-chunk-9

两个图例更改为水平排列：

p + scale_shape_discrete(label = c("female","male")) +
  theme(legend.direction = "horizontal")

plot of chunk unnamed-chunk-10

修改图例的边框和背景

pg_plot+
  theme(legend.position = c(0.85,0.2))+
  theme(legend.background = element_rect(fill = "orange",color = "black"))

plot of chunk unnamed-chunk-11

中间还有一部分是白色，需要另外一个参数修改：

pg_plot+
  theme(legend.position = c(0.85,0.2))+
  theme(legend.background = element_rect(fill = "orange",color = "black"),
        legend.key = element_rect(fill = "orange")
        )

plot of chunk unnamed-chunk-12

改变图例顺序

pg_plot <- ggplot(PlantGrowth, aes(x = group, y = weight, fill = group)) +
  geom_boxplot()

pg_plot

plot of chunk unnamed-chunk-13

# limits
pg_plot +
  scale_fill_discrete(limits = c("trt1", "trt2", "ctrl"))

plot of chunk unnamed-chunk-14

也可以在画图之前，通过因子化的方法把数据先排好序再画图哦。

反转图例顺序

2种方法。

pg_plot+scale_fill_discrete(guide = guide_legend(reverse = T))

plot of chunk unnamed-chunk-15

pg_plot+guides(fill = guide_legend(reverse = T))

plot of chunk unnamed-chunk-16

修改图例标题

2种方法。

pg_plot <- ggplot(PlantGrowth, aes(x = group, y = weight, fill = group)) +
  geom_boxplot()

pg_plot

plot of chunk unnamed-chunk-17

labs里面修改

pg_plot + labs(fill = "Condition")

plot of chunk unnamed-chunk-18

在scale_*函数里面修改。

pg_plot+scale_fill_discrete(name = "hahah")

plot of chunk unnamed-chunk-19

还有一种比较复杂的情况，如果多个一个变量映射给多个图形参数，或者有多个图例，怎么修改呢？像下面这个例子，sex和shape、color都有关。

p <- ggplot(heightweight, aes(x=ageYear, y=heightIn, shape=sex, colour=sex))+geom_point()
p

plot of chunk unnamed-chunk-20

可以在scale_*函数中修改：

p + scale_shape_discrete(name = "shape")+
  scale_color_discrete(name = "colooorrr")

plot of chunk unnamed-chunk-21

也可以在legend中修改：

p + labs(shape = "shapppeee",color = "colooorrr")

plot of chunk unnamed-chunk-22

还可以在guides函数中修改：

p + guides(shape = guide_legend(title = "this is\nshape"),
           color = guide_legend(title = "cooolor")
           )

plot of chunk unnamed-chunk-23

修改图例标题外观

pg_plot <- ggplot(PlantGrowth, aes(x = group, y = weight, fill = group)) +
  geom_boxplot()
pg_plot

plot of chunk unnamed-chunk-24

可以在theme中修改:

pg_plot + theme(
  legend.title = element_text(
    face = "italic",
    family = "Times",
    colour = "red",
    size = 18
  )
)

plot of chunk unnamed-chunk-26

也可以在guides中修改：

pg_plot +
  guides(fill = guide_legend(title.theme = element_text(
    face = "italic",
    family = "Times",
    colour = "red",
    size = 14))
  )

plot of chunk unnamed-chunk-27

移除图例标题

pg_plot

plot of chunk unnamed-chunk-29

可以在theme中修改，也可以在scale_xxx函数中修改，也可以在guides函数中修改。

pg_plot+theme(legend.title = element_blank())

plot of chunk unnamed-chunk-30

pg_plot+scale_fill_discrete(name = NULL)

plot of chunk unnamed-chunk-30

pg_plot+scale_fill_hue(guide = guide_legend(title = NULL))

plot of chunk unnamed-chunk-30

pg_plot+guides(fill = guide_legend(title = NULL))

plot of chunk unnamed-chunk-30

修改图例标签

pg_plot

plot of chunk unnamed-chunk-31

pg_plot+scale_fill_discrete(labels = c("label1","label2","label3"))

plot of chunk unnamed-chunk-32

修改图例标签外观

在theme中修改：

pg_plot +
  theme(legend.text = element_text(
    colour = "red",
    face = "italic",
    size = 22)
  )

plot of chunk unnamed-chunk-33

总结

到此这篇关于R语言ggplot2图例修改的文章就介绍到这了,更多相关R语言ggplot2图例修改内容请搜索脚本之家以前的文章或继续浏览下面的相关文章希望大家以后多多支持脚本之家！

您可能感兴趣的文章:

使用R语言实现自动文摘的方法
本文介绍了如何使用R语言实现自动文摘，我们首先介绍了基于词频-逆文档频率（TF-IDF）的自动文摘方法，包括创建词项文档矩阵，计算TF-IDF值，提取关键词，以及根据关键词生成摘要，需要的朋友一起学习下吧
2023-05-05
R语言如何将大型Excel文件转为dta格式详解
这篇文章主要给大家介绍了关于R语言如何将大型Excel文件转为dta格式的相关资料，文中通过示例代码介绍的非常详细，对大家的学习或者工作具有一定的参考学习价值，需要的朋友们下面随着小编来一起学习学习吧
2021-03-03
R语言-如何截取变量中指定位置的若干个字符
这篇文章主要介绍了R语言截取变量中指定位置的若干个字符，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧
2021-04-04
使用R语言绘制3D数据可视化scatter散点图实现步骤
这篇文章主要为大家介绍了使用R语言绘制3D数据可视化scatter散点图的实现步骤，有需要的朋友可以借鉴参考下，希望能够有所帮助，祝大家多多进步
2022-02-02
R语言-如何将科学计数法表示的数字转化为文本
这篇文章主要介绍了R语言-如何将科学计数法表示的数字转化为文本，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧
2021-04-04
R语言ggplot2拼图包patchwork安装使用
这篇文章主要介绍了R语言ggplot2拼图包patchwork安装使用的图文示例详解，有需要的朋友可以借鉴参考下，希望能够有所帮助，祝大家多多进步，早日升职加薪
2022-06-06
R语言实现操作MySQL数据库
这篇文章主要介绍了R语言实现操作MySQL数据库，文中通过示例代码介绍的非常详细，对大家的学习或者工作具有一定的参考学习价值，需要的朋友们下面随着小编来一起学习学习吧
2021-03-03
R语言关于非线性最小二乘的知识点实例
在本篇文章里小编给大家整理的是一篇关于R语言关于非线性最小二乘的知识点实例内容，有兴趣的朋友们可以学习下。
2021-05-05
R语言编程学习从Github上安装包解决网络问题
这篇文章主要为大家介绍了R语言编程从Github上安装包的过程详解，这样可以解决很多网络问题，有需要的朋友可以借鉴参考下，希望能够有所帮助
2021-11-11
基于R/RStudio中安装包“无法与服务器建立连接”的解决方案
这篇文章主要介绍了基于R/RStudio中安装包“无法与服务器建立连接”的解决方案，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧
2021-04-04