gg_segment function

Segment ggplot