如何在R语言ggplot气泡图图例中设置白色填充与黑色边框？

我来帮你搞定这个图例样式的需求～ 你想要让图例里的圆圈带有黑色边框、白色填充，其实可以通过ggplot的guide_legend()配合override.aes参数来强制修改图例的美学属性，具体做法如下：

修改后的完整代码 #

set.seed(123) # 设置随机种子，确保结果可复现
dta1 <- data.frame(LON = runif(20)*100, LAT = runif(20)*100, VALUE = runif(20)*10)
dta2 <- data.frame(LON = runif(20)*100, LAT = runif(20)*100, VALUE = runif(20)*10)

ggplot() +
  geom_point(data=dta1, color = "blue", alpha = 0.5, aes(x=LON, y=LAT, size = VALUE)) +
  geom_point(data=dta2, color = "red", alpha = 0.5, aes(x=LON, y=LAT, size = VALUE)) +
  # 关键：修改size图例的显示样式
  guides(size = guide_legend(
    override.aes = list(
      fill = "white",   # 设置图例圆圈填充为白色
      color = "black",  # 设置图例圆圈边框为黑色
      alpha = 1         # 取消图例圆圈的透明度，让样式更清晰
    )
  ))

代码解释 #

• override.aes是ggplot图例设置里的核心参数，它可以忽略图层的原始美学设置，强制替换图例元素的样式。
• 因为你原本的点图层设置了alpha=0.5，图例默认会继承这个透明度，所以这里把alpha=1改成不透明，能让图例的黑边框和白填充更醒目。
• 由于你的两个点图层都是用VALUE映射到size，所以只需要修改size对应的图例样式即可，两个颜色的点会共享这个size图例的样式。

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