用ggmap绘制热图？

Question

我想使用R和ggmaps在墨西哥城地图上绘制热图，

我用

构建了一张地图

g.map <- get_map(location = c(lon = -99.1393, lat = 19.3772), 
          zoom = 11, maptype = 'roadmap')
map <- ggmap(g.map)

我有一个纬度/经度的数据框和区域内的推文数量，就像这样

     x      y    tweets
1 -99.300 19.200   1
2 -99.291 19.209   10
3 -99.282 19.218   2
4 -99.273 19.227   4
5 -99.264 19.236   5
6 -99.255 19.245   9

我已经可以使用

绘制一个包含代表每条推文的点的地图

map + geom_point(aes(x=x,y=y,size=c,colour=c),data=tweets.df)

我读到另一个问题，你可以使用geom_density2d绘制热图，但结果看起来有点奇怪

那么，我做错了什么？

Answer 1

您可以尝试

map + geom_point(aes(x = x, y = y, size = c, colour = c), 
                 data = tweets.df, 
                 alpha = 0.5)

获得便宜且容易的热图效果。