dcl.predict.prior {DCL} | R Documentation |
Pointwise predictions (RBNS/IBNR split) adding prior knowledge
Description
Pointwise predictions by calendar years and rows of the outstanding liabilities. The predictions are splitted between RBNS and IBNR claims.
Usage
dcl.predict.prior( Ntriangle , Xtriangle , inflat.i , inflat.j , Qi ,
Model = 2, adj = 2, Tail = FALSE, Tables = TRUE,
summ.by = "diag", num.dec = 2 )
Arguments
Ntriangle |
Optional. The counts data triangle: incremental number of reported claims. It should be a matrix with the observed counts located in the upper triangle and the lower triangle consisting in missing or zero values. It should has the same dimension as the |
Xtriangle |
The paid run-off triangle: incremental aggregated payments. It should be a matrix with incremental aggregated payments located in the upper triangle and the lower triangle consisting in missing or zero values. |
inflat.i |
Optional. A vector with dimension m (the dimension of the input triangles) specifying the severity inflation in the underwriting direction. If not specified it will be estimated using |
inflat.j |
Optional. A vector with dimension m specifying the severity inflation in the development direction. If not specified it will be assumed to be 1 and then the severity mean not depending on the development period. |
Qi |
Optional. A vector with dimension m specifying the probability of zero-claims for each underwriting period. If not specified then it will be assumed no zero-payments. |
Model |
Possible values are 0, 1 or 2 (default). See |
adj |
Method to adjust the estimated delay parameters for the distributional model. It should be 1 (default value) or 2. See |
Tail |
Logical. If |
Tables |
Logical. If |
summ.by |
A character value such as |
num.dec |
Number of decimal places used to report numbers in the tables. Used only if |
Details
The predictions are calculated under the first moment assumptions in the DCL model (see M1-M3) in Martinez-Miranda, M.D., Nielsen, J.P. and Verrall, R. (2012). In this case the severity mean is specified as
inflat.i * (1-Qi) * inflat.j * mu
where inflat.i
, Qi
, inflat.j
and mu
are prior information specified by the user. With this specification, the prediction formula consists of the expectation (conditional expectation -if Ntriangle
is given and Model=0
) of the future (RBNS/IBNR) aggregated payments. See formulas (8)-(9) in the paper.
If the prior information is not provided the function will return the DCL predictions as dcl.predict
. The information about Qi
, inflat.j
can be extracted through DCL using extract.prior
.
Value
Xrbns |
A matrix with dimension m by 2m-1 (m being the dimension of the input triangles in DCL) having the outstanding RBNS numbers as the entries. |
Drbns |
A vector with dimension 2m-1 with elements being the outstanding liabilities for RBNS claims in the future calendar periods (sums by diagonals). The last value is the RBNS reserve (overall sum). |
Rrbns |
A vector with dimension m with elements being the outstanding liabilities for RBNS claims at each underwriting period (sums by rows). The last value is the RBNS reserve (overall sum). |
Xibnr |
A matrix with dimension m by 2m-1 (m being the dimension of the input triangles in DCL) having the outstanding IBNR numbers as the entries. |
Dibnr |
A vector with dimension 2m-1 with elements being the outstanding liabilities for IBNR claims in the future calendar periods (sums by diagonals). The last value is the IBNR reserve (overall sum). |
Ribnr |
A vector with dimension m with elements being the outstanding liabilities for IBNR claims at each underwriting period (sums by rows). The last value is the RBNS reserve (overall sum). |
Xtotal |
A matrix with dimension m by 2m-1 (m being the dimension of the input triangles in DCL) having the outstanding total (=RBNS+IBNR) numbers as the entries. |
Dtotal |
A vector with dimension 2m-1 with elements being the outstanding liabilities for all claims in the future calendar periods (sums by diagonals). The last value is the total (=RBNS+IBNR) reserve (overall sum). |
Rtotal |
A vector with dimension m with elements being the outstanding liabilities for all claims at each underwriting period (sums by rows). The last value is the total (=RBNS+IBNR) reserve (overall sum). |
Author(s)
M.D. Martinez-Miranda, J.P. Nielsen and R. Verrall
References
Martinez-Miranda, M.D., Nielsen, J.P. and Verrall, R. (2012) Double Chain Ladder. Astin Bulletin, 42/1, 59-76.
Martinez-Miranda, M.D., Nielsen, J.P., Verrall, R. and Wuthrich, M.V. (2013) Double Chain Ladder, Claims Development Inflation and Zero Claims. Scandinavian Actuarial Journal. In press.
See Also
dcl.estimation
, bdcl.estimation
, idcl.estimation
, dcl.predict
,extract.prior
Examples
## Data application by in Martinez-Miranda, Nielsen, Verrall and Wuthrich (2013)
data(NtrianglePrior)
data(NpaidPrior)
data(XtrianglePrior)
Ntriangle<-NtrianglePrior
Xtriangle<-XtrianglePrior
Npaid<-NpaidPrior
## Extract information about zero-claims and severity dev. inflation
my.priors<-extract.prior(Xtriangle,Npaid,Ntriangle)
my.inflat.j<-my.priors$inflat.j
my.Qi<-my.priors$Qi
# Reproducing the poinwise predicions (tables 3,4,5) in the paper
# Note: in the paper we did not use Ntriangle in the predictions
# when modelling the predictions are slightly different
## Prior A: only using development year inflation
m<-nrow(Ntriangle)
preds.prior.A.gen<-dcl.predict.prior(Ntriangle,Xtriangle,
inflat.j=my.inflat.j,Qi=rep(0,m),Model=0,adj=1,
Tail=FALSE,Tables=TRUE,summ.by="diag",num.dec=2)
preds.prior.A.mod<-dcl.predict.prior(Ntriangle,Xtriangle,
inflat.j=my.inflat.j,Qi=rep(0,m),Model=2,adj=2,
Tail=FALSE,Tables=TRUE,summ.by="diag",num.dec=2)
## Prior B: only using zero claims inflation
preds.prior.B.gen<-dcl.predict.prior(Ntriangle,Xtriangle,
inflat.j=rep(1,m),Qi=my.Qi,Model=0,adj=1,
Tail=FALSE,Tables=TRUE,summ.by="diag",num.dec=2)
preds.prior.B.mod<-dcl.predict.prior(Ntriangle,Xtriangle,
inflat.j=rep(1,m),Qi=my.Qi,Model=2,adj=2,
Tail=FALSE,Tables=TRUE,summ.by="diag",num.dec=2)
## Prior C: only using development inflation and zero claims inflation
preds.prior.C.gen<-dcl.predict.prior(Ntriangle,Xtriangle,
inflat.j=my.inflat.j,Qi=my.Qi,Model=0,adj=1,
Tail=FALSE,Tables=TRUE,summ.by="diag",num.dec=2)
preds.prior.C.mod<-dcl.predict.prior(Ntriangle,Xtriangle,
inflat.j=my.inflat.j,Qi=my.Qi,Model=2,adj=2,
Tail=FALSE,Tables=TRUE,summ.by="diag",num.dec=2)