additional check

mcconvil · Dec 13, 2023 · 11cba78 · 11cba78
1 parent 0c0a42c
commit 11cba78
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/modifiedGreg.R b/R/modifiedGreg.R
@@ -90,6 +90,10 @@ modifiedGreg <- function(y,
     stop("'y' must be the same length as 'domains'")
   }
 
+  if (sum(is.na(y)) > 0) {
+    stop("'y' cannot contain any NA values")
+  }
+
   if (is.null(N)) {
     if (datatype == "raw") {
       N <- nrow(xpop)