如何在ggplot的联邦利率与泰勒规则图中添加衰退带？

错误核心原因 #

这个报错是因为geom_rect默认继承了主图的数据集，而你用来标记衰退的REC2数据，和绘制利率/泰勒规则的主数据行数不一致，导致xmin/xmax这类美学映射的长度和主数据不匹配，触发了长度校验错误。

修复方案 #

1. 强制指定geom_rect的数据集 #

在geom_rect中明确传入data = REC2参数，让它单独使用衰退带数据，而非主图数据。

2. 合理设置美学映射 #

衰退带的纵向范围可以设为-Inf到Inf，确保覆盖整个y轴；横向范围直接用REC2里的衰退起止时间即可。可选添加inherit.aes = FALSE彻底切断和主图美学的继承，避免额外冲突。

修复后的示例代码 #

假设你的主数据名为fed_rate_data，REC2包含recession_start（衰退开始时间）和recession_end（衰退结束时间）两列：

ggplot(data = fed_rate_data, aes(x = year)) +
  # 联邦基金利率折线
  geom_line(aes(y = fed_funds), color = "blue", linewidth = 1) +
  # 泰勒规则折线
  geom_line(aes(y = taylor_rule), color = "red", linewidth = 1, linetype = "dashed") +
  # 衰退带（关键：指定专属数据集）
  geom_rect(
    data = REC2,
    aes(xmin = recession_start, xmax = recession_end),
    ymin = -Inf,
    ymax = Inf,
    fill = "gray80",
    alpha = 0.3,
    inherit.aes = FALSE
  ) +
  labs(
    x = "年份",
    y = "利率",
    title = "1960-2023年美国联邦基金利率与泰勒规则对比",
    subtitle = "灰色带为美国经济衰退期"
  ) +
  theme_minimal()

额外注意点 #

• 若你的时间列是Date格式，要确保REC2里的衰退起止时间也是相同格式，否则会出现坐标轴不匹配问题。
• 如果衰退带仍不显示，检查REC2的时间范围是否和主图的1960-2023区间重叠。

内容的提问来源于stack exchange，提问作者ImProograming