How do I build US cities using ggplot?

I can portray the state of Louisiana just fine ...

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

enter image description here

Now I have data on how many calls were made to certain cities in Los Angeles. How would I add an item for each city where a request for a sale to a site was made?

 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 
+6
source share
2 answers
 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") 

ggplot2

On google map:

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

Google map

+11
source

The following part of the script should work for the google map part:

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

0
source

Source: https://habr.com/ru/post/983761/


All Articles