library(survival)
data('cancer')