\({}_n q_x^{(\tau)}\) from a multiple-decrement table

\({}_n q_x^{(\tau)}\) from a multiple-decrement table

Usage

nqxtau_md(tbl, x, n)

Arguments

tbl

Output from md_table().

x

Starting age.

n

Number of years.

Value

Numeric scalar.

Examples

x <- 45:50
qmat <- cbind(q1 = c(.011, .012, .013, .014, .015, .016), q2 = rep(.1, 6))
tbl <- md_table(x, qmat, radix = 1000)
nqxtau_md(tbl, x = 46, n = 2)
#> [1] 0.212344