pts = sf::read_sf(system.file('extdata/pts.gpkg',package = 'sdsfun'))
pts_v = sf_voronoi_diagram(pts)
library(ggplot2)
ggplot() +
geom_sf(data = pts_v, color = 'red',
fill = 'transparent') +
geom_sf(data = pts, color = 'blue', size = 1.25) +
theme_void()
Run the code above in your browser using DataLab