library(survival)
d1 = within(survival::udca, expr = {
edp_yr = Surv_3Date(entry.dt, death.dt, last.dt, units = 'years')
edp_mon = Surv_3Date(entry.dt, death.dt, last.dt, units = 'months')
})
head(d1)
noout = within(survival::udca, expr = {
edp_bug = Surv_3Date(entry.dt, death.dt, as.Date('1991-01-01'), units = 'months')
})
subset(survival::udca, subset = entry.dt > as.Date('1991-01-01')) # check error as suggested
Run the code above in your browser using DataLab