df <- data.frame(
polygon_id = c(rep(1, 5), rep(2, 10))
, line_id = c(rep(1, 10), rep(2, 5))
, x = c(0,0,1,1,0,2,2,5,5,2,3,3,4,4,3)
, y = c(0,1,1,0,0,2,5,5,2,2,3,4,4,3,3)
, z = c(1)
, m = c(1)
)
m <- as.matrix( df )
sfg_multipolygon( df[, c("x","y") ] )
sfg_multipolygon(
df, x = "x", y = "y", polygon_id = "polygon_id", linestring_id = "line_id"
)
sfg_multipolygon(
df, x = "x", y = "y", z = "z", polygon_id = "polygon_id", linestring_id = "line_id"
)
sfg_multipolygon(
df, x = "x", y = "y", z = "z", m = "m", polygon_id = "polygon_id", linestring_id = "line_id"
)
sfg_multipolygon( m[, c("x","y") ] )
sfg_multipolygon(
m, x = "x", y = "y", polygon_id = "polygon_id", linestring_id = "line_id"
)
sfg_multipolygon(
m, x = "x", y = "y", z = "z", polygon_id = "polygon_id", linestring_id = "line_id"
)
sfg_multipolygon(
m, x = "x", y = "y", z = "z", m = "m", polygon_id = "polygon_id", linestring_id = "line_id"
)
Run the code above in your browser using DataLab