Adding network ggplot script