填充地图上 geom_point 的 ggplot2 图例

Question

我一直在努力在美国县级地图上绘制 covid-19，感谢这个论坛的帮助，我得到了一个我非常满意的产品。但是，我想改变传说的制作方式，但不确定如何做。有几个数据框进入下面的 sn-p

p <- counties_cov %>%
  ggplot() +
  geom_sf(mapping = aes(fill = cases), color = NA) +
  geom_sf(data = states_sf, fill = NA, color = "black", size = 0.25) +
  coord_sf(datum = NA) +   
  scale_fill_gradient(name = "Cases", trans = "log", low='green', high='red',
                      na.value = "white",
                      breaks=c(1, max(counties_cov$cases))) +
  geom_point(data=myBizLocations, aes(x=longitude.1, y=latitude.1,size=personnel), color = "hotpink") +
  theme_bw() + 
  theme(legend.position="bottom", 
        panel.border = element_blank(),
        axis.title.x=element_blank(), 
        axis.title.y=element_blank())

对于昨天的数据，这会产生

我想做的只是修改当前“人员”中的图例文本，这只是用于调整 geom_points 大小的数据列的名称。我不确定如何在不影响“案例”规模的情况下做到这一点......

理想情况下，我想更进一步，将案件比例放在底部，但将人员比例放在右侧……不过，这是次要的。

Answer 1

您应该能够将任何aes() 元素的图例名称更改为labs() 中的参数。所以像：

p <- your plot code
p + labs(size='Fun New Text!')

或者，您可以使用theme(legend.title = ...)，或在scale_size_continuous() 内调用，但labs() 方式可能是最简单的。