R/draw.bubble.R

In mapplots: Data Visualisation on Maps

Defines functions draw.bubble

Documented in draw.bubble

draw.bubble <-
function(x,y,z,maxradius=1,...){
  cex <- 2*maxradius/par('cxy')[2]/.375
  maxz <- max(z,na.rm=T)
  points(x,y,cex=cex*sqrt(z)/sqrt(maxz),...)
}

Try the mapplots package in your browser