# NOT RUN {
r <- raster(system.file("external/test.grd", package="raster") )
s <- stack(r, 1/r, sqrt(r))
pairs(s)
# }
# NOT RUN {
# to make indvidual histograms:
hist(r)
# or scatter plots:
plot(r, 1/r)
# }
Run the code above in your browser using DataLab