Flatten a list of rsgeo vectors
Examples
pnts <- replicate(
10,
geom_point(runif(1), runif(1)),
simplify = FALSE
)
flatten_geoms(pnts)
#> <rs_POINT[10]>
#> [1] Point(Coord { x: 0.48208011547103524, y: 0.5995658254250884 }))
#> [2] Point(Coord { x: 0.4935413070488721, y: 0.1862176014110446 }))
#> [3] Point(Coord { x: 0.8273733186069876, y: 0.6684667381923646 }))
#> [4] Point(Coord { x: 0.7942398607265204, y: 0.10794362588785589 }))
#> [5] Point(Coord { x: 0.723710946040228, y: 0.4112744296435267 }))
#> [6] Point(Coord { x: 0.8209462941158563, y: 0.6470601938199252 }))
#> [7] Point(Coord { x: 0.7829327622894198, y: 0.5530363116413355 }))
#> [8] Point(Coord { x: 0.5297195801977068, y: 0.7893562316894531 }))
#> [9] Point(Coord { x: 0.023331202333793044, y: 0.47723006503656507 }))
#> [10] Point(Coord { x: 0.7323137386702001, y: 0.6927315564826131 }))