# NOT RUN {
x = matrix(rnorm(20*30, 5),ncol=20)
rownames(x) <- 1:30
colnames(x) <- letters[1:20]
imageColorscale(x)
imageColorscale(x,col=getBlueWhiteRed(), zlim=c(-1,1))
imageColorscale(x,col=getBlueWhiteRed(), zlim=c(-5,5))
# }
Run the code above in your browser using DataLab