# NOT RUN {
data(habData)
image(x=seq(0.5,39.5,1), y=seq(0.5,39.5,1),
z=t(matrix(as.numeric(habData$habCov1),40)), main="habData: Factor environmental covariate",
xlab="x", ylab="y", col=rainbow(3))
dev.new()
image(x=seq(0.5,39.5,1), y=seq(0.5,39.5,1),
z=t(matrix(habData$habCov2,40)), main="habData: Continuous environmental covariate",
xlab="x", ylab="y", col=terrain.colors(50))
# }
Run the code above in your browser using DataLab