r - ggplot-maps 中未显示图例标题

Question

一旦我在 scale_fill_distiller-option 中为我的图例标签添加了动态范围，我只会得到一个“1”，而不是在 labs(fill="title") 中定义的图例标题。我必须改变什么？

这是我的代码：

map <- ggplot()+
  geom_sf(data=data, aes(fill=Count_Number)) +
  labs(title="Chart Title", 
       x="",y="") +
  labs(colour = "Legend Title") +
  scale_fill_distiller(palette ="RdBu", direction = -1, na.value="#ffffff", 
                       range(c(min(data$Count_Number, na.rm=T),max(data$Count_Number,na.rm=T))), 
                       breaks = seq(min(data$Count_Number, na.rm=T),max(data$Count_Number, na.rm=T),by=2)) +  
  theme_opts +
  theme(plot.title = element_text(size=12, face="bold")) +  
  theme(legend.position="bottom") +
  theme(legend.key.width=unit(2,"cm")) +
  theme(legend.title=element_text(size=11)) +
  theme(legend.text=element_text(size=12)) +
  theme(legend.key.size = unit(0.5, "cm")) +
  ggrepel::geom_label_repel(
    data = gmddata_covid,
    aes(label = Case, geometry = geometry),
    stat = "sf_coordinates",
    min.segment.length = 0,
    color = "#333333",
    segment.color = "white",
    size = 2.5
  )  

提前感谢您的帮助

标签： rggplot2mapslegendtitle