如何让R绘制的折线图与Python生成的图表样式一致？

核心问题原因 #

你遇到的scale_color_manual值已被使用，将覆盖之前设置报错，是因为多次调用scale_color_manual会重复定义全局颜色比例尺，R会强制覆盖之前的设置，最终只有最后一次的配置生效，同时触发警告。正确的做法是全局仅设置一次颜色映射，而非给每个geom_line单独添加。

具体解决方案 #

根据你的数据格式，分两种场景处理：

场景1：数据为长格式（有分组列区分线条）

如果你的All_Flights_Combined_Month是长格式（比如有一列flight_category用来标记不同线条的组别），直接在aes中映射color变量，然后统一设置一次颜色：

library(ggplot2)

# 假设Python目标颜色为：航班A="#1f77b4"，航班B="#ff7f0e"，航班C="#2ca02c"
ggplot(All_Flights_Combined_Month, aes(x = month, y = passenger_count, color = flight_category)) +
  geom_line(linewidth = 1) # 匹配Python线条粗细
  scale_color_manual(
    name = "航班类型", # 匹配Python图例标题
    values = c(
      "航班A" = "#1f77b4",
      "航班B" = "#ff7f0e",
      "航班C" = "#2ca02c"
    )
  ) +
  # 匹配Python主题（比如seaborn默认主题对应theme_minimal）
  theme_minimal() +
  labs(x = "月份", y = "乘客数量") # 匹配坐标轴标签

场景2：数据为宽格式（多列对应不同线条）

如果是通过多个geom_line分别绘制不同变量（比如flight_A、flight_B列），需要在每个geom_line的aes中指定color的分组名称，再统一设置颜色：

library(ggplot2)

ggplot(All_Flights_Combined_Month, aes(x = month)) +
  geom_line(aes(y = flight_A, color = "航班A"), linewidth = 1) +
  geom_line(aes(y = flight_B, color = "航班B"), linewidth = 1) +
  geom_line(aes(y = flight_C, color = "航班C"), linewidth = 1) +
  # 仅设置一次scale_color_manual
  scale_color_manual(
    name = "航班类型",
    values = c(
      "航班A" = "#1f77b4",
      "航班B" = "#ff7f0e",
      "航班C" = "#2ca02c"
    )
  ) +
  theme_minimal() +
  labs(x = "月份", y = "乘客数量")

额外样式匹配建议 #

要完全对齐Python图表样式，还可以调整以下细节：

• 线条样式：用linetype参数设置虚线/实线，匹配Python的linestyle
• 图例位置：用theme(legend.position = "top")或"right"调整
• 字体设置：用theme(text = element_text(family = "Arial"))匹配Python字体
• 颜色提取：如果不知道Python的具体颜色值，可以直接提取seaborn默认调色板：

  # 提取seaborn默认6种颜色
  seaborn_colors <- c("#4c72b0", "#55a868", "#c44e52", "#8172b2", "#ccb974", "#64b5cd")
  

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