data(gemas)
str(gemas)
## sample sites
## Not run:
# require(ggmap)
# map <- get_map("europe", source = "stamen", maptype = "watercolor", zoom=4)
# ggmap(map) + geom_point(aes(x=longitude, y=latitude), data=gemas)
# map <- get_map("europe", zoom=4)
# ggmap(map) + geom_point(aes(x=longitude, y=latitude), data=gemas, size=0.8)
# ## End(Not run)
Run the code above in your browser using DataLab