igraph ggplot rStudio How can I make lines between nodes longer and add arrows? Also how can I make the legend smaller?

Question

I have a really wordy network plot. I am basically trying to have it function as a sort of flow chart. I am trying to make its aesthetics both functional and pleasing, but I