如何避免ggplotly将不同美学映射的两个因子合并到同一图例

问题分析 #

你的代码中fill（对应因子z）和shape（对应因子w）的图例被自动合并，且出现(x,1)格式标签，原因是：

• ggplot默认会在不同美学映射的因子水平数量一致时合并图例；
• plotly继承了这一合并逻辑，并生成了组合式标签。

解决方案 #

通过两步设置实现图例拆分与标签优化：

1. 拆分独立图例 #

给两个美学映射设置不同的图例名称，并通过guides()明确各自的显示样式，强制ggplot不合并图例。

2. 优化标签格式 #

拆分图例后，每个图例的标签会直接使用因子的原始水平值，自动避免(x,1)的组合格式。

修改后的可复现代码 #

library(ggplot2)
library(plotly)
library(stats)

set.seed(123) # 固定随机种子，保证结果可复现
ids <- c(1,2,3,4,5)

df1 <- data.frame(
  id = ids,
  w = rpois(5,100),
  y = rpois(5, 100)
)

df2 <- data.frame(
  id = ids,
  z = rpois(5, 100),
  y = rpois(5, 100)
)

plot <- ggplot(mapping = aes(x = id)) + 
  geom_bar(data = df2, mapping = aes(y = y), stat = "identity", width=0.5, alpha = 0.2) + 
  geom_point(data = df2, mapping = aes(y = y, fill = factor(z)), size = 3) + 
  geom_point(data = df1, mapping = aes(y = y, shape = factor(w)), color = "green", size=5) +
  # 给两个图例设置不同名称，避免自动合并
  scale_fill_discrete(name = "z值") +
  scale_shape_discrete(name = "w值") +
  # 自定义图例样式：填充图例仅显示颜色，形状图例仅显示绿色形状
  guides(
    fill = guide_legend(override.aes = list(shape = NA)),
    shape = guide_legend(override.aes = list(fill = NA, color = "green"))
  )

ggplotly(plot)

关键说明 #

• scale_fill_discrete和scale_shape_discrete设置不同图例名称，是阻止ggplot合并图例的核心；
• guides()中的override.aes用于优化图例显示：填充图例隐藏形状，形状图例设置正确的绿色并隐藏填充，让每个图例只展示对应美学属性；
• 拆分图例后，plotly会分别渲染两个独立图例，标签直接使用z和w的原始数值，不再出现(x,1)格式。

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