Update Systemic_disease_graphs.R