powered by
Function to evaluate multiple decrement insurances
Axn.mdt(object, x, n, i, decrement)
The scalar representing APV of the insurance
an mdt or actuarialtable object
mdt
actuarialtable
policyholder's age
contract duration
interest rate
decrement category
The function is experimental and very basic. Testing is still needed. Use at own risk!
#creates a temporary mdt myTable<-data.frame(x=41:43,lx=c(800,776,752),d1=rep(8,3),d2=rep(16,3)) myMdt<-new("mdt",table=myTable,name="ciao") Axn.mdt(myMdt, x=41,n=2,i=.05,decrement="d2")
Run the code above in your browser using DataLab