Skip to content

Instantly share code, notes, and snippets.

@mollietaylor
Created December 5, 2012 00:27
Show Gist options
  • Star 3 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mollietaylor/4210660 to your computer and use it in GitHub Desktop.
Save mollietaylor/4210660 to your computer and use it in GitHub Desktop.
bikemap.R
gps <- read.csv("out.csv",
header = TRUE)
library(ggmap)
mapImageData <- get_googlemap(center = c(lon = median(gps$Longitude), lat = median(gps$Latitude)),
zoom = 11,
# size = c(500, 500),
maptype = c("terrain"))
ggmap(mapImageData,
extent = "device") + # takes out axes, etc.
geom_point(aes(x = Longitude,
y = Latitude),
data = gps,
colour = "red",
size = 1,
pch = 20)
@buiduongthe
Copy link

Dear mollietaylor

out.csv? Exame

thanks

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment