如何将 Boxplot 上的数据点与 R 中的线条连接起来？

在 R 中，我们可以使用 boxplot() 函数来创建箱线图（Boxplot），箱线图是数据分布的一种可视化方法。默认情况下，箱线图只会显示数据的中位数、四分位数、最小值、最大值以及离群值，不会显示数据中的每个观测值。

但是，有时候我们想要将箱线图上的每个数据点与其对应的值连接起来，这样可以更好地理解数据的分布情况。在本文中，我们将学习如何实现这种效果。

1. 创建演示数据

为了方便演示，我们先创建一组简单的数据，并用 boxplot() 函数生成箱线图。

set.seed(123)
data <- data.frame(group = rep(1:3, each = 10), value = rnorm(30))
boxplot(value ~ group, data = data, col = "lightgray", pch = 16)

从上图可以看出，我们生成了一个包含三个分组的数据集，每个分组有 10 个观测值，数据点的颜色为浅灰色。

2. 将数据点与线条连接起来

为了将数据点与线条连接起来，我们需要借助一种叫做 segments() 的函数。该函数可以绘制两个点之间的线条，我们可以利用这个函数将数据点与箱线连接起来。

接下来，我们将使用以下步骤来完成此任务：

• 使用 boxplot() 函数生成箱线图，并保存返回值；
• 使用 segments() 函数绘制连接线。

第一步已经完成，接下来我们将完成第二步。下面是完整的代码，其中包含了上述两个步骤。

plot <- boxplot(value ~ group, data = data, col = "lightgray", pch = 16)

# 将数据点与线条连接起来
for (i in 1:3) {
    x <- plot$group[i]
    y <- data$value[data$group == x]
    segments(x, quantile(y, 0.25), x, quantile(y, 0.75), lwd = 2)
    segments(x - 0.1, median(y), x + 0.1, median(y), lwd = 2)
    points(rep(x, length(y)), y, col = "black", pch = 16)
}

在上述代码中，我们首先保存了 boxplot() 函数的返回值，以便稍后使用。然后我们使用 for 循环遍历数据集的每个分组，分别计算出每个分组中数据的中位数、四分位数，并使用 segments() 函数将数据点与这些线条连接起来。接着我们使用 points() 函数将每个数据点重新绘制出来，以达到黑色数据点与浅灰色数据点重叠的效果。

最终生成的图像如下：

3. 总结

本文介绍了如何将 Boxplot 上的数据点与 R 中的线条连接起来，通过使用 segments() 函数，我们可以将数据点与其对应的线条连接起来，更直观地了解数据的分布情况。