# NOT RUN {
# Database connection and 'sf' layer
source("~/Dropbox/postgis_159.R") ## Creates connection object 'con'
x = towns
# Query 1: Buffer
query = "SELECT ST_Buffer(geom, 0.1, 'quad_segs=2') AS geom FROM x LIMIT 5;"
st_postgis(x, con, query)
# Query 2: Extrusion
query = "SELECT ST_Extrude(geom, 0, 0, 30) AS geom FROM x LIMIT 5;"
st_postgis(x, con, query)
# }
Run the code above in your browser using DataLab