ggplot2中调整离散色条刻度标签位置避免标签重叠

需求约束：不修改breaks原取值、不加宽色条，解决底部水平色条0值两侧-1、1标签过近被误识别为"-11"的问题，以下两种方法均满足约束。

方案1：正负半轴标签差异化对齐（推荐） #

水平色条数值从左到右递增，将所有小于0的刻度标签设为右对齐，标签落在对应刻度左侧；所有大于0的刻度标签设为左对齐，标签落在对应刻度右侧。调整后0点两侧的-1、1标签会自然向两边分开，中间空出0值对应的色块区域，其余刻度本身间距充足，对齐调整后不会出现重叠问题。

完整可运行代码：

library(dplyr)
library(ggplot2)
library(scales)

set.seed(123)
df <- data.frame(
  x = runif(1000),
  y = runif(1000),
  z1 = rnorm(1000)*10
)

breaks_vec <- c(-20, -10, -5, -1, 1, 5, 10, 20)
# 负半轴标签右对齐(hjust=1)，正半轴标签左对齐(hjust=0)
hjust_vec <- ifelse(breaks_vec < 0, 1, 0)

df %>% ggplot() + 
  geom_point(aes(x=x,y=y, color=z1)) + 
  scale_color_steps2(
    low = muted("darkblue"), mid = "white", high = muted("darkred"), 
    midpoint = 0,
    # 阶梯色阶需配套使用guide_colorsteps，原代码的guide_colorbar为连续色条向导
    guide = guide_colorsteps(barwidth = 20, label.hjust = hjust_vec),
    breaks = breaks_vec
  ) + 
  theme_minimal() + 
  theme(legend.position = 'bottom') +
  labs(x='', y='', color='')

方案2：单独偏移紧邻0的标签 #

如果不需要调整所有标签的对齐规则，仅微调过近的两个标签位置即可，通过label.x参数传入和breaks等长的偏移向量，其余标签保持默认居中无偏移，仅将-1标签向左偏移、1标签向右偏移：

breaks_vec <- c(-20, -10, -5, -1, 1, 5, 10, 20)
# 偏移量为相对色条宽度的比例，负数左移、正数右移，可按需调整数值
offset_vec <- c(0, 0, 0, -0.03, 0.03, 0, 0, 0)

df %>% ggplot() + 
  geom_point(aes(x=x,y=y, color=z1)) + 
  scale_color_steps2(
    low = muted("darkblue"), mid = "white", high = muted("darkred"), 
    midpoint = 0,
    guide = guide_colorsteps(barwidth = 20, label.x = offset_vec),
    breaks = breaks_vec
  ) + 
  theme_minimal() + 
  theme(legend.position = 'bottom') +
  labs(x='', y='', color='')

注：两种方法都不会改动色条本身的分段、宽度和breaks取值，仅调整标签的显示位置，符合布局限制要求。

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