# NOT RUN {
library("raster")
tahoe_highrez <- brick(system.file("external/tahoe_highrez.tif", package="spatial.tools"))
is.Raster(tahoe_highrez)
tahoe_lidar_bareearth <-
raster(system.file("external/tahoe_lidar_bareearth.tif", package="spatial.tools"))
is.Raster(tahoe_lidar_bareearth)
is.Raster("character")
# }
Run the code above in your browser using DataLab