R语言中如何为含负值的离散分箱标签添加长破折号

首先，你的代码存在一个关键错误：cut函数的breaks参数必须严格升序排列，当前传入的c(-0.4,-0.10,-0.5,-0.025,0,0.05,0.1,0.15,4)中，-0.10后接-0.5是降序逻辑，会导致分箱功能异常，先修正这个顺序。

针对负值区间标签的可读性问题，直接在labels中使用Unicode长破折号—（替代短破折号-），同时调整区间表述逻辑（比如把反向的0 - -2.5改为符合数值顺序的-2.5 — 0），就能让图例标签更清晰。

修正后的代码如下：

shp <- shp %>% 
  mutate(discrete_var = cut(mean, 
                            # 修正为升序的分箱断点
                            breaks = c(-0.5, -0.4, -0.10, -0.025, 0, 0.05, 0.1, 0.15, 4),
                            # 使用长破折号优化标签可读性
                            labels = c("-50 — -40", "-40 — -10", "-10 — -2.5", "-2.5 — 0", 
                                       "0 — 5", "5 — 10", "10 — 15", "15 — 400")))

关键调整说明： #

• 修正分箱断点顺序：cut依赖升序断点来生成正确的左开右闭区间，原代码的降序逻辑会导致分箱错误。
• 替换长破折号：用—彻底区分负号和区间连接符，避免视觉混淆。
• 优化区间表述：将反向的区间标签调整为从小到大的数值顺序，让读者一眼看懂区间范围。

如果需要保留你原本的前缀/后缀式标签（比如-10 -表示小于-10%），可以调整labels为：

labels = c("— -40", "-40 — -10", "-10 — -2.5", "-2.5 — 0", 
           "0 — 5", "5 — 10", "10 — 15", "15 —")

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