R语言ggplot2如何在箱式图上把点也显示出来

介绍

箱式图（boxplot）是一种常用的数据可视化图表，通过展示数据的中位数、四分位数、异常值等，能够有效地呈现数据的分布情况和离散程度。而ggplot2是R语言中一个强大的数据可视化工具，可以轻松绘制各种类型的图表。本文将详细介绍如何使用ggplot2在箱式图上同时显示数据的箱体和散点。

准备数据

首先，我们需要准备一组适合绘制箱式图的数据。在这个示例中，我们将使用mtcars数据集中的汽车燃油效率数据（mpg）来演示。

data(mtcars)
mpg_data <- mtcars$mpg

绘制简单的箱式图

使用ggplot2绘制箱式图非常简单。下面的代码将绘制汽车燃油效率数据的箱式图。

library(ggplot2)

ggplot(data = mtcars, aes(x = "", y = mpg)) +
  geom_boxplot()

运行以上代码，我们可以看到绘制出了一个简单的箱式图，其中y轴表示燃油效率。

添加散点

我们使用geom_point函数来在箱式图上添加散点。将散点的数据设为mtcars数据集中的mpg变量，同时设置透明度（alpha）和点的大小（size），以增加可视化效果。

ggplot(data = mtcars, aes(x = "", y = mpg)) +
  geom_boxplot() +
  geom_point(data = mtcars, aes(x = "", y = mpg), alpha = 0.5, size = 3)

运行以上代码，我们可以看到在箱式图上添加了散点，同时调整了透明度和点的大小。

设置颜色和形状

可以根据需要设置散点的颜色和形状。下面的代码将展示如何使用颜色映射来表示不同类型的汽车。

ggplot(data = mtcars, aes(x = "", y = mpg, color = factor(cyl), shape = factor(am))) +
  geom_boxplot() +
  geom_point(aes(color = factor(cyl), shape = factor(am)), alpha = 0.5, size = 3) +
  scale_color_manual(values = c("#F8766D", "#00BA38", "#619CFF"), 
                     labels = c("4", "6", "8")) +
  scale_shape_manual(values = c(21, 23), labels = c("Automatic", "Manual"))

以上代码中，我们通过设置color和shape参数将汽车的气缸数（cyl）和变速器类型（am）映射到散点的颜色和形状上。

添加标签

为了更清晰地展示散点的分布情况，可以在散点上添加标签。下面的代码将在散点上方添加标签，以显示汽车的型号。

ggplot(data = mtcars, aes(x = "", y = mpg, color = factor(cyl), shape = factor(am))) +
  geom_boxplot() +
  geom_point(aes(color = factor(cyl), shape = factor(am)), alpha = 0.5, size = 3) +
  geom_text(aes(label = rownames(mtcars)), vjust = -1, hjust = 0.5, size = 3.5) +
  scale_color_manual(values = c("#F8766D", "#00BA38", "#619CFF"), 
                     labels = c("4", "6", "8")) +
  scale_shape_manual(values = c(21, 23), labels = c("Automatic", "Manual"))