# NOT RUN {
# Load simulated data as example
data(simu_data)
# Estimate remaining life expectancy and Life Years
# Lost after age 45 years and before age 95 years
lyl_estimation <- lyl(data = simu_data, t = age_death, status = death,
age_specific = 45, tau = 95)
# Summarize and plot the data
summary(lyl_estimation)
# }
Run the code above in your browser using DataCamp Workspace