如何在R中绘制以年度X值为横轴的点线组合图？

你完全可以用给定的数据集直接绘制目标图，不需要分开绘制年份-X、X-Y的图表，用ggplot2就能实现核心需求——按年份顺序连接对应(X,Y)的点线组合图，关键是要控制线条的连接逻辑（而非默认按X值分组连线）。

步骤1：构造数据集 #

首先将你提供的宽格式数据转换为ggplot2适配的长格式数据框：

dataset <- data.frame(
  Year = 2005:2011,
  X = c(0, 0, 0, 1, 1, 1, 1),
  Y = c(0, 0, 0, 0, 0, 3, 3)
)

步骤2：绘制点线组合图 #

核心是使用geom_path（按数据行顺序连线，正好对应年份顺序）替代默认的geom_line（按X轴数值顺序连线），同时保留geom_point展示每个年份的对应点：

library(ggplot2)

ggplot(dataset, aes(x = X, y = Y)) +
  # 绘制每个年份对应的点，用颜色区分年份
  geom_point(aes(color = factor(Year)), size = 3) +
  # 按年份顺序（数据行顺序）连接所有点
  geom_path() +
  # 固定X轴刻度为0和1
  scale_x_discrete(breaks = c(0, 1)) +
  # 设置图表标签
  labs(
    x = "X变量值",
    y = "Y变量值",
    color = "年份"
  )

替代方案：用geom_line实现 #

如果你更习惯用geom_line，只需给它指定group = 1，强制所有点按数据顺序（年份顺序）连线，效果和geom_path一致：

ggplot(dataset, aes(x = X, y = Y)) +
  geom_point(aes(color = factor(Year)), size = 3) +
  geom_line(aes(group = 1)) +
  scale_x_discrete(breaks = c(0, 1)) +
  labs(x = "X变量值", y = "Y变量值", color = "年份")

说明 #

• 这两种方法都能避免geom_line默认按X值分组（把所有X=0的点连在一起、X=1的点连在一起）的问题，实现按年份顺序连接每个(X,Y)点的需求。
• 你可以根据需求调整点的大小、颜色，或者添加主题样式来优化图表。

内容的提问来源于stack exchange，提问作者안영서