R ggplot2 geom_point按组设置填充色并合并图例问题求解

• 因子水平不匹配：is_female的实际因子水平为Male、Female，但原代码中scale_color_manual、scale_fill_manual的映射键写为"M"、"F"，和数据水平完全不匹配，导致颜色映射失效，ggplot自动输出默认灰色。
• 多图例未合并：原代码将linetype、color、fill三个美学属性分别映射到分组变量，但未统一各标度的图例名称与标签，默认生成多个独立图例。
• 点形状选择错误：原代码使用shape="square"为无填充通道的实心形状，不支持单独设置轮廓色与填充色，无法实现黑边+差异化填充的效果，需选用21-25号支持双颜色通道的形状，带边框正方形对应数值22。

ggplot(dat, aes(x=mean_exp, y=mean_fi)) +
  # 散点：固定黑色轮廓，填充色映射分组，统一使用带边框正方形
  geom_point(aes(fill=is_female, shape=is_female), size=3, color="black") +
  # 连线：固定黑色，线型映射分组
  geom_line(aes(linetype=is_female), color="black", linewidth=0.8) +
  scale_x_continuous(limits = c(18, 30), breaks = seq(20, 30, 5), expand = c(0,0)) +
  scale_y_continuous(limits = c(0.05, 0.15), breaks = seq(0.05, 0.15, 0.02), expand = c(0,0)) +
  # 形状标度：两组均使用带边框正方形
  scale_shape_manual(values = c("Male" = 22, "Female" = 22)) +
  # 填充标度：男性组填充黑色，女性组填充白色
  scale_fill_manual(values = c("Male" = "black", "Female" = "white")) +
  # 线型标度：可按需调整，示例为男性实线、女性虚线
  scale_linetype_manual(values = c("Male" = "solid", "Female" = "dashed")) +
  # 统一所有分组相关美学的图例名称，触发自动合并
  labs(
    x= expression(Body ~ mass ~ index ~ (kg/m^2)), 
    y= "Mean baseline FI score", 
    title = "BMI",
    fill = "Gender",
    shape = "Gender",
    linetype = "Gender"
  ) +
  theme_classic() +
  theme(plot.title = element_text(hjust=0.5),
        legend.position = "bottom")

• 所有散点带统一黑色轮廓，男性组点填充黑色，女性组点填充白色
• 两组连线均为纯黑色，可通过修改scale_linetype_manual的values参数调整线型样式
• 映射到同一分组变量的填充、形状、线型属性统一了图例标题，会自动合并为单个图例放置在底部
• 修复了映射规则不匹配导致的灰色输出问题
• 若不需要按分组区分连线线型，删除geom_line中的aes(linetype=is_female)、scale_linetype_manual以及labs中linetype = "Gender"的配置即可，连线会自动按分组连接，保持全黑样式。

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