R/spatial.plot.R

Defines functions spatial.plot

Documented in spatial.plot

spatial.plot <-
function(x,y,add=TRUE,cx=1){
 nc<-as.numeric(cut(y,20))
if(!add) plot(x,pch=" ")
 points(x,pch=20,col=terrain.colors(20)[nc],cex=cx)
image.scale(y,col=terrain.colors(20))

}
jaroyle/SCRbayes documentation built on May 18, 2019, 4:48 p.m.