Add mortalityTable.NA to indicate an empty table

NAMESPACE

@@ -18,6 +18,7 @@ export(makeQxDataFrame)
 export(mortalityComparisonTable)
 export(mortalityTable)
 export(mortalityTable.MakehamGompertz)
+export(mortalityTable.NA)
 export(mortalityTable.Weibull)
 export(mortalityTable.ageShift)
 export(mortalityTable.deMoivre)

R/mortalityTable.period.R

@@ -92,3 +92,8 @@ mortalityTable.onceAndFuture = function(transitionAge, name = "Deterministic mor
     )
 }
 
+
+#' Empty mortality table indicating NA
+#'
+#' @export
+mortalityTable.NA = mortalityTable.period(name = NA_character_, ages = NA_integer_, deathProbs = NA_real_)

man/mortalityTable.NA.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/mortalityTable.period.R
+\docType{data}
+\name{mortalityTable.NA}
+\alias{mortalityTable.NA}
+\title{Empty mortality table indicating NA}
+\format{An object of class \code{mortalityTable.period} of length 1.}
+\usage{
+mortalityTable.NA
+}
+\description{
+Empty mortality table indicating NA
+}
+\keyword{datasets}