如何用ggplot上不同列的线连接两个点

Question

我有一个包含三列的数据集：年份、最小值和最大值。 我想在每年的最小值和最大值之间绘制一条线。

此图显示了一个 geom_point 图，其中包含每年的最小值和最大值，但我不知道如何将这两个值与一条线连接起来，因为它们来自不同的列。

这是ggplot的代码：

#plot year (y) and max and min points (x)
ggplot(phen2, aes(y=Year)) + 
  geom_point(aes(x = max, color = "max")) + 
  geom_point(aes(x = min, color = "min"))

Answer 1

如果只需要将一列的数据连接到另一列的数据，可以使用geom_segment指定每个段的开头和结尾：

library(ggplot2)
ggplot(tail(msleep), aes(y = name)) + 
  geom_segment(aes(x = awake, xend = bodywt, yend = name)) +
  geom_point(aes(x = awake, color = "awake")) +
  geom_point(aes(x = bodywt, color = "bodywt")) 

使用 ggplot2 的更典型方法是将您的数据转换为更长的格式，每个观察都在自己的行中。 较长的数据通常使用 ggplot2 具有更简单的绘图代码，并且通常更容易处理图例。 可以使用dplyr和tidyr来重塑数据，这是library(tidyverse)包含的另外两个包。

library(dplyr); library(tidyr)

# data prep
tail(msleep) %>%
  select(name, awake, bodywt) %>%
  pivot_longer(-name, names_to = "stat", values_to = "val") %>%

# slightly simpler plotting & mapping color to source column
  ggplot(aes(x = val, y = name)) +
  geom_line() +
  geom_point(aes(color = stat))