我试图绘制谷歌地图正在使用RgoogleMaps包查询和与ggplot结合起来。 最后,我想用显示总人口geom_point
,有点类似但下面我想集中的蒙哥马利地区,因为过度绘制的图片。
我很沮丧,因为我不能画出我的查询地图中R.我尝试了几个包如read.jpeg
和png
,但它并没有完全制定。
ř代码:
#query google map
al1 <- GetMap(center=c(32.362563,-86.304474), zoom=11, destfile = "al2.jpeg",
format="jpg",maptype="roadmap")
#load only specific states
alabama <- subset(all_states, region %in% c("alabama"))
#population
p1 <- ggplot()
p1 <- p1 + geom_polygon(data=alabama,
aes(x=long, y=lat, group=group), colour="white", fill="grey10")
p1 <- p1 + geom_point(data=quote, aes(x=IntPtLon, y=IntPtLat, size=TotPop,
color=TotPop),colour="coral1") + scale_size(name="Total Pop")
编辑:
下面是我粗略的结果。 我还是想:
- 因为他们似乎相当小地图上的改变点大小规模。
- 做点透明或不填,这样的地图仍然可见。
al1 <- get_map(location = c(lon = -86.304474, lat = 32.362563), zoom = 11, maptype = 'terrain')
al1MAP <- ggmap(al1)+ geom_point(data=quote_mgm, aes(x=IntPtLon, y=IntPtLat, size=TotPop))