web-dev-qa-db-ja.com

Rでggplotを使用してGoogleマップをプロットする

RgoogleMapsパッケージを使用してクエリされた Google map をプロットし、ggplotと組み合わせようとしています。最終的には、geom_pointを使用して総人口を表示したいと思います。これは下の図のようになりますが、プロットが多すぎるため、モンゴメリ地域に集中しようとしています。

クエリしたマップをRでプロットできないため、イライラします。read.jpegやpngなどのパッケージをいくつか試しましたが、うまくいきませんでした。

Rコード：

#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")

enter image description here

編集：

これが私の大まかな結果です。私はまだしたい：

  • ドットはマップ上ではかなり小さいように見えるため、ドットのサイズのスケールを変更します。
  • マップが引き続き表示されるように、ドットを透明にするか、塗りつぶさないようにします。

enter image description here

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))
rgoogle-mapsggplot2geocodingggmap
15
Ken

これはあなたが求めているものですか。 ggmapパッケージを使用するため、プロセスが簡素化されます。見る ?get_mapおよび?ggmapその他のオプション。優れたリソースは The R Journal で入手できます。

library(ggmap)
al1 = get_map(location = c(lon = -86.304474, lat = 32.362563), zoom = 11, maptype = 'roadmap')
al1MAP = ggmap(al1)
al1MAP

enter image description here

27
Sandy Muspratt