powered by
Helper function to add shape
build_shape( edge, label, nsets = length(edge), shape_id, type = c("ellipse", "triangle", "polygon", "circle") )
a list of xy matrix
2:7
a unique id
c("ellipse","triangle","polygon","circle")
a tibble with columns: nsets, type, shape_id, component, id, xy.