diff --git a/R/mortalityTable.jointLives.R b/R/mortalityTable.jointLives.R index d79ae95b88e2d6af544bf78baad82132adc6b27a..bea87ddbad5e7fd0daebcc4629fefd722b5ed98f 100644 --- a/R/mortalityTable.jointLives.R +++ b/R/mortalityTable.jointLives.R @@ -1,6 +1,7 @@ #' @include mortalityTable.R periodDeathProbabilities.R NULL +setClassUnion("mortalityTable(s)", c("mortalityTable", "list")) #' Class mortalityTable.jointLives - Life table for multiple joint lives #' #' A cohort life table obtained by calculating joint death probabilities for @@ -13,7 +14,7 @@ NULL mortalityTable.jointLives = setClass( "mortalityTable.jointLives", slots = list( - table = "mortalityTable" + table = "mortalityTable(s)" ), contains = "mortalityTable" )