Layer_Mean {Pareto}

Expected Loss of a Reinsurance Layer

Description

Calculates the expected loss of a reinsurance layer for a collective model

Usage

Layer_Mean(CollectiveModel, Cover = Inf, AttachmentPoint = 0)

Arguments

CollectiveModel

A collective model object. Currently only PPP_Models are handled.

Cover

Numeric. Cover of the reinsurance layer. Use Inf for unlimited layers.

AttachmentPoint

Numeric. Attachment point of the reinsurance layer.

Value

The expected loss of the layer Cover xs AttachmentPoint for the given CollectiveModel

Examples

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)