Life Table In R