Tracciare google map con ggplot in R

Question

Sto provando a tracciare Google map che viene interrogato usando il pacchetto RgoogleMaps e combinalo con ggplot. In definitiva, voglio mostrare la popolazione totale usando geom_point, in qualche modo simile alla foto qui sotto, ma sto cercando di concentrarmi sulla regione di Montgomery a causa della sovraesposizione.

Sono frustrato perché non riesco a tracciare la mia mappa interrogata in R. Ho provato un paio di pacchetti come read.jpeg e png ma non ha funzionato.

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

EDIT:

Ecco il mio risultato di massima. Voglio ancora:

• Modificare la scala della dimensione dei punti perché sembrano piuttosto piccoli sulla mappa.
• Rende i punti trasparenti o non pieni in modo che la mappa sia ancora visibile.

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

Answer 1

E 'questo quello che stai dopo. Utilizza il pacchetto ggmap, che semplifica il processo. Vedere ?get_map e ?ggmap per ulteriori opzioni. Una risorsa eccellente è disponibile in The R Journal

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