added graphs and  R scripts that created them