geom_segment ggplot with envfit data

Can you format your code to make it readable or better yet try to provide a reproducible example?