knitr::opts_chunk$set(echo = TRUE)
This vignette will cover capped mean functions, exposure and increased limit factor curves of the NetSimR package. It will overview the theory behind these functions, propose posible uses and illustrate examples. The distributions covered for claim severities are LogNormal, Gamma, Pareto, Sliced LogNormal-Pareto, Sliced Gamma-Pareto. An application of the capped mean is suggested in the article "Taken to Excess" accessible here.
\pagebreak
Let claim severity $x$ originate from a probability density function $f(x)$ and a cumulative density function $F(x)$. Let claims be capped at amount $c$. The capped claim severity is defined as $y=Min(x,c)$.
The expected mean can be estimated by: $$E(x)=\int_0^{\infty}xf(x)~dx$$ The expected capped claim can be obtained by: $$E(y)=\int_0^{\infty}yf(x)~dx$$ The above simplifies to: $$E(y)=c-\int_0^{c}F(x)~dx$$ This equation will need to be solved for every distribution.
This function provides the percentage of total claims cost that lies below a certain claims level. Exposure curve at a claims cap is calculated by: $$EC(c)=\frac{E(y)}{E(x)}$$
This function provides the ratio of expected capped claims to a higher cap $c_{h}$ to the expected claims of a lower cap $c_{l}$. Let the claim capped at $c_{h}$ be $y_{h}$ and the claim capped at $c_{h}$ be $y_{h}$. Increased limit factor curve at a claims caps $c_{h}$ and $c_{l}$ is calculated by: $$ILF(c_{h},c_{l})=\frac{E(y_{h})}{E(y_{l})}$$
\pagebreak
In this section we will suggest possible uses of the specified functions.
For property lines/sections:
Note: for property lines, instead of severity, we may opt to model severity as a percentage of sum insured. In GLMs this is equivalent to having the sum insured as the exposure for the severity distribution.
For casualty lines/sections:
\pagebreak
The below code ilustrates an alternative and more accurate approach to applying capping in regressions, for modelling attritional claims part. The code steps are:
The example suggests that the proposed method outperforms the market approach on LogNormal distribution. The one-way benefit will not be significant on a Gamma distribution, but when we move to a GLM and the model relativities are larger, the capped mean benefit may also be significant.
#required packages library("NetSimR") library("crch") #Set parameters n<-10000 mu<-6 sigma<-1.7 Cap <- 10000 #Set seed to keep simulations constant set.seed(10) #Simulate data x<-round(rlnorm(n,mu,sigma),0) head(x) summary(x) plot(x) hist(x, breaks = 400, xlim = c(0,10000)) #cap data z<-ifelse(x>Cap,Cap,x) head(z) summary(z) plot(z) hist(z, breaks = 200) #fit linear regression lmLinear<-lm(log(z)~1) summary(lmLinear) #fit right censored regression lmCensored<-crch(log(z)~1, right = log(Cap), link.scale="identity", dist = "gaussian") summary(lmCensored) #Compare regression outputs cbind(coefficients(lmLinear),summary(lmLinear)$sigma) coefficients(lmCensored) #Compare regressions' attritional capped cost to empirical round(cbind( Empirical=mean(z) ,LinearModel=exp(coefficients(lmLinear)+0.5*summary(lmLinear)$sigma*summary(lmLinear)$sigma) ,CensoredModel=LNormCappedMean(Cap,coefficients(lmCensored)[1],coefficients(lmCensored)[2]) ),0)
Modelling excess levels would be similar to the above approach. In that case the expected mean above the excess levels would be the mean less the expected mean below the excess level. This is elaborated in the article cited in the introduction section.
For a LogNormal severity, generating the exposure curve value at a particular point is obtained by running the below code:
ExposureCurveLNorm(1000,5,1.6)
This would be interpreted as: 56% of the expected cost is up to 1,000 currency units. Other distributions follow the same logic. The challenge for this exercise would be fitting the correct severity distribution, rather than calculating the Exposure curve's value.
For a LogNormal severity, generating the increased limit factor value between two particular points is obtained by running the below code:
ILFLNorm(1000,1500,5,1.6)
This would be interpreted as: the expected cost of the claims up to 1,500 currency units is 1.155 times the expected cost is up to 1,000 currency units. Other distributions follow the same logic. The challenge for this exercise would be fitting the severity distribution, rather than calculating the Increased Limit Factor curve's value.
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.