Maps in R
require(ggmap);require(ggplot2);options(warn=-1)
a1="Flatiron Coffee,2721 Arapahoe Ave,Boulder, CO 80302"
a2="Pekoe Sip House,2500 30th St #100,Boulder, CO 80301"
a3="Red Rock Coffeehouse,3325 28th St,Boulder, CO 80301"
geocode(a1)
source("http://quantedu.com/wp-content/upload...")
Address=c(a1,a2,a3);Lat= Co_ords(Address)$lat;Long= Co_ords(Address)$lng
df = data.frame(Address, Lat,Long);df
City="Boulder, Colorado"
map = get_map(location = City, zoom = 13, maptype = "terrain")
p1=ggmap(map)
p1 + geom_point(data=df, aes(x=Long, y=Lat) ,color="red", size=7, alpha=0.5)