From 891ff48a0144da454d1b41c5da773afc994bb1c0 Mon Sep 17 00:00:00 2001 From: objectclosure Date: Wed, 27 Jul 2022 15:00:22 +0300 Subject: [PATCH] Fix grammar in `QuantileIFRS17()` --- R/QuantileIFRS17.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/QuantileIFRS17.R b/R/QuantileIFRS17.R index d9ffc186..e64407c3 100644 --- a/R/QuantileIFRS17.R +++ b/R/QuantileIFRS17.R @@ -13,7 +13,7 @@ QuantileIFRS17 <- function(MCL, Correlation, RiskMargin) } ## Check that we have at least two triangles if(length(MCL) < 2){ - stop("Please provide at least a list of at least two MackChainLadder objects.") + stop("Please provide a list of at least two MackChainLadder objects.") } ## Check that the triangles are of the same dimensions dims <- sapply(MCL, function(x) dim(x$Triangle))