ggplot2使用geom_line时如何指定绘制顺序避免线条重叠

解决方法 #

ggplot 同个geom_line图层内的分组绘制顺序由分组变量（这里是name列）的因子水平顺序决定，靠前的水平先绘制、会被后绘制的水平覆盖，只需要把name列转为自定义顺序的因子即可。

实现方案 #

• 方案1：修改分组变量因子顺序（最简洁，不改动原有绘图逻辑）
  仅需在pivot_longer之后新增一行指定name列的因子顺序即可，完整代码如下：

library(tidyverse)
foo <- tibble(x=1:100,y1=rnorm(100,1),y2=rnorm(100,2)) %>%
  mutate(y1Spline = smooth.spline(y1,spar=0.5)$y,
         y2Spline = smooth.spline(y2,spar=0.5)$y) %>%
  pivot_longer(cols=-x) %>%
  # 新增本行自定义因子顺序，顺序和你要求的绘制顺序完全对应
  mutate(name = factor(name, levels = c("y1", "y2", "y1Spline", "y2Spline")))

cols = c("darkgreen","darkblue")
ggplot(foo,aes(x=x,y=value,col=name, alpha=name)) +
  geom_line() +
  scale_color_manual(values=rep(cols,each=2)) +
  scale_alpha_manual(values=c(0.5,1,0.5,1))

如果你后续把平滑列名改为y1Smooth、y2Smooth，直接替换factor的levels参数里的对应字符串即可。

• 方案2：拆分多个图层手动控制顺序
  适合需要单独调整不同线条参数的场景，按你要的绘制顺序依次添加geom_line图层即可：

cols = c("darkgreen","darkblue")
ggplot() +
  geom_line(data = filter(foo, name == "y1"), aes(x=x,y=value,col=name, alpha=name)) +
  geom_line(data = filter(foo, name == "y2"), aes(x=x,y=value,col=name, alpha=name)) +
  geom_line(data = filter(foo, name == "y1Spline"), aes(x=x,y=value,col=name, alpha=name)) +
  geom_line(data = filter(foo, name == "y2Spline"), aes(x=x,y=value,col=name, alpha=name)) +
  scale_color_manual(values=rep(cols,each=2)) +
  scale_alpha_manual(values=c(0.5,1,0.5,1))

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