Fix for missing denominator in In chart.

anhoej · Jan 13, 2025 · 12a0160 · 12a0160
1 parent 527ec6f
commit 12a0160
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/helper.functions.R b/R/helper.functions.R
@@ -183,10 +183,10 @@ qic.mr <- function(x) {
 
 qic.in <- function(x) {
   base <- x$baseline & x$include
-  
+
   # Fix missing denominator
   if (all(is.na(x$n))) {
-    x$n <- 1    
+    x$n <- x$y.length
   }
 
   if (anyNA(x$cl)) {