微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

更改 stat_density_2d 图例以显示犯罪数量

如何解决更改 stat_density_2d 图例以显示犯罪数量

我正在尝试为圣路易斯市的部分地区制作犯罪密度图。以下是数据示例:

df <- data.frame(crime = c("assault","homicide","burglary","larceny","larceny"),lon = c(-90.25233,-90.25494,-90.25194,-90.25613,-90.24882),lat = c(38.65320,38.66046,38.65503,38.65624,38.65747))

我的目标是制作一个密度图,表示每个 bin 中的犯罪数量(即 0-5 次犯罪、5-10 次犯罪等)。这是我迄今为止尝试过的代码

library(ggmap)
map <- get_googlemap(center = c(lon = -90.2514,lat = 38.6540),zoom = 15)
ggmap(map)+
  stat_density_2d(
      aes(x = lon,y = lat,fill = ..level..,alpha = .6),size = .1,bins = 4,data = df,geom = "polygon"
    )

密度图看起来准确,但考虑到只有 5 个点,图例的值太大了。我的问题是:如何调整图例以反映每个垃圾箱中的犯罪数量

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。