R ode for plotting bipartite networks.