在geom_sf（R ggplot）中的颜色栏图例中添加逗号

Question

我正在使用ggplot和geom_sf制作地图，我想在图例中的值上添加逗号。我发现编辑颜色栏的唯一方法是通过“指南”，但是after :cache, :process!似乎没有任何作用（可能是因为“标签”不是“指南”中包含的规范？）我得到一个完全相同的传说，其中包括超过1000个逗号。

获取所有数据的代码有点长，所以我希望有人知道这个答案而无需重新表达，但是我可以根据需要对其进行编辑。谢谢！

+ guides(fill = guide_colorbar(labels="comma"))

Answer 1

尝试一下。我将使用sf包中的示例。

library(sf)
#> Linking to GEOS 3.6.1, GDAL 2.1.3, proj.4 4.9.3
library(ggplot2)
fname <-  system.file("shape/nc.shp", package = "sf")
nc <-  read_sf(fname)

ggplot(nc)+
  geom_sf(aes(fill = BIR79))+
  scale_fill_continuous(labels=function(x) format(x, big.mark = ",", scientific = FALSE))

由reprex package（v0.2.0）于2018-09-19创建。

因此，对于您的示例，您将编写：

scale_fill_gradient(low="lightcoral", high="darkred", name="Number of Fish", labels=function(x) format(x, big.mark = ",", scientific = FALSE))

Answer 2

尝试使用 scales::comma 如下：

scale_fill_gradient(label = scales::comma)