savePngCentredAt <- function(address) {
  require(dismo)
  x <- geocode(address)
  range <- as.numeric(x[4:7]) + c(-0.01, 0.01, -0.01, 0.01)
  e <- extent(range)
  g <- gmap(e, type = "roadmap")
  require(digest)
  png(path.expand(paste('~/public_html/',digest(address,
algo='sha1'),'.png',sep='')))
  plot(g)
  dev.off()
}

The code above saves a PNG corresponding to a roadmap for given
address. How do I add a marker for the address given to the PNG? Many
thanks! -- H
-- 
Sent from my mobile device
Envoyait de mon portable

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to