Próbuję spiskowaćMapa Google który jest zapytany za pomocą pakietu RgoogleMaps i połącz go z ggplot. Ostatecznie chcę pokazać całkowitą populację za pomocągeom_point, nieco podobny do poniższego zdjęcia, jednak staram się skoncentrować na regionie Montgomery z powodu nadmiernego kreślenia.

Jestem sfrustrowany, ponieważ nie mogę wykreślić mapy z zapytaniem w R. Wypróbowałem kilka pakietów, takich jakread.jpeg ipng ale to się nie udało.

Kody R:

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

EDYTOWAĆ:

Oto mój szorstki wynik. Nadal chcę:

Zmień skalę rozmiaru kropek, ponieważ na mapie wydają się one raczej małe.Spraw, by kropki były przezroczyste lub nie wypełnione, aby mapa była nadal widoczna.

<code>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))
</code>