Create election_graph.R