if (FALSE) {
pgWriteRast(conn, c("schema", "tablename"), raster_name)
# basic test
r <- raster::raster(nrows=180, ncols=360, xmn=-180, xmx=180,
ymn=-90, ymx=90, vals=1)
pgWriteRast(conn, c("schema", "test"), raster = r,
bit.depth = "2BUI", overwrite = TRUE)
}
Run the code above in your browser using DataLab