Added survival plots
Added survival plots
Updated R code