% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/survival_models.R
\name{ex_curtate}
\alias{ex_curtate}
\title{Curtate expectation of life}
\usage{
ex_curtate(x, model, ..., k_max = 5000, tol = 1e-12)
}
\arguments{
\item{x}{Numeric vector of ages.}

\item{model}{One of \code{"uniform"}, \code{"exponential"},
\code{"gompertz"}, \code{"makeham"}, or \code{"weibull"}.}

\item{...}{Model parameters.}

\item{k_max}{Maximum integer duration to sum to.}

\item{tol}{Stop early if the summand is smaller than this tolerance for
several consecutive steps.}
}
\value{
Numeric vector of curtate expectations.
}
\description{
Computes \eqn{e_x = E[K_x] = \sum_{k=1}^{\infty} {}_k p_x}.
}
