Added all 4 r scripts with their respective png plots.