View source: R/CollectiveModelMethods.R
Layer_Mean | R Documentation |
Calculates the expected loss of a reinsurance layer for a collective model
Layer_Mean(CollectiveModel, Cover = Inf, AttachmentPoint = 0)
CollectiveModel |
A collective model object. Currently only |
Cover |
Numeric. Cover of the reinsurance layer. Use |
AttachmentPoint |
Numeric. Attachment point of the reinsurance layer. |
The expected loss of the layer Cover
xs AttachmentPoint
for the given CollectiveModel
PPPM <- PiecewisePareto_Match_Layer_Losses(Example1_AP, Example1_EL)
PPPM
Example1_Cov <- c(diff(Example1_AP), Inf)
Example1_AP
Example1_Cov
Example1_EL
Layer_Mean(PPPM, Example1_Cov, Example1_AP)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.