data(soa08Act)
#last survival status annuity
axyn(tablex=soa08Act, tabley=soa08Act, x=65, y=70, n=5, status = "last",
type = "EV")
#first survival status annuity
Axyn(tablex=soa08Act, tabley=soa08Act, x=65, y=70, status = "last",
type = "EV")
Run the code above in your browser using DataLab