R/Etronq_exp.R

In gabrielcrepeault/tvarPackage: Calculate Mean, Variance, Truncated Mean, VaR, TVaR, etc for different probability distributions

Defines functions Etronq_exp

Documented in Etronq_exp

#' Espérance tronquée d'une loi exponentielle
#' @param b beta
#' @param d montant du déductible
#' @export
Etronq_exp <- function(d, b) (1/b)*(1 - exp(-b*d)) - d*exp(-b*d)