Ggplot kullanarak ABD şehirlerini nasıl gösteririm?

Question

Gayet iyi Louisiana durumunu belirleyebiliriz ...

Şimdi, LA belirli şehirlerde yapılan kaç satış aramaları üzerine verilere sahip

require(ggplot2) 
require(ggmap) 
require(maps) 
LA <- map_data("state", region="louisiana") 
ggplot(LA, aes(x=long, y=lat))+geom_polygon() 

. Arsa için satış çağrısının yapıldığı her şehir için nasıl bir puan ekleyebilirim? Bir Google Haritada

salesCalls <- data.frame(State=rep("louisiana",5), 
          City=c("Baton Rouge", "New Orleans", "Shreveport", "Lafayette", "Mandeville"), 
          Calls=c(10,5,8,13,2)) 
salesCalls 
     State  City Calls 
1 louisiana Baton Rouge 10 
2 louisiana New Orleans  5 
3 louisiana Shreveport  8 
4 louisiana Lafayette 13 
5 louisiana Mandeville  2 

Answer 1

require(ggplot2) 
require(ggmap) 
require(maps) 
LA <- map_data("state", region="louisiana") 

salesCalls <- data.frame(State=rep("louisiana",5), 
         City=c("Baton Rouge", "New Orleans", "Shreveport", 
           "Lafayette", "Mandeville"), 
         Calls=c(10,5,8,13,2)) 

salesCalls <- cbind(geocode(as.character(salesCalls$City)), salesCalls) 

salesCalls 
#   lon  lat  State  City Calls 
# 1 -91.14032 30.45828 louisiana Baton Rouge 10 
# 2 -90.07153 29.95107 louisiana New Orleans  5 
# 3 -93.75018 32.52515 louisiana Shreveport  8 
# 4 -92.01984 30.22409 louisiana Lafayette 13 
# 5 -90.06563 30.35825 louisiana Mandeville  2 

ggplot(LA, aes(x=long, y=lat)) + 
    geom_polygon() + 
    coord_map() + 
    geom_point(data=salesCalls, aes(x=lon, y=lat, size=Calls), color="orange") 

:

ggmap(get_map(location = 'Louisiana', zoom = 7)) + 
    geom_point(data=salesCalls, aes(x=lon, y=lat, size=Calls), color="orange") 

Answer 2

Aşağıdaki komut dosyası google çalışması gerekir eşleyen kısmı:

ggmap (get_map (konum = 'Louisiana', yakınlaştırma = 7)) + geom_point (data = salesCalls, aes (x = salesCalls $ lon, y = salesCalls $ lat, size = salesCalls $ Aramalar), color = "orange"