ggplot for survival after transform