# NOT RUN {
tahoe_highrez <- brick(system.file("external/tahoe_highrez.tif", package="spatial.tools"))
test_blank_file <- create_blank_raster(filename=paste(tempfile(),".gri",sep=""),
reference_raster=tahoe_highrez,nlayers=2,
create_header=FALSE,format="raster",datatype="FLT8S",bandorder="BSQ")
test_blank_raster <- build_raster_header(x_filename=test_blank_file,
reference_raster=tahoe_highrez,out_nlayers=2,
datatype='FLT8S',format='raster',bandorder="BSQ",setMinMax=TRUE)
test_blank_raster
# }
Run the code above in your browser using DataLab