Update characterization-cohorts.R

missing values in database comparison was causing an error. This is fixed by imputing 0 when values are NA.
OHDSI · Sep 23, 2024 · 22e0ebf · 22e0ebf
1 parent 58118c4
commit 22e0ebf
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/characterization-cohorts.R b/R/characterization-cohorts.R
@@ -969,6 +969,10 @@ characterizatonGetCohortComparisonDataContinuous <- function(
                                    -"settingId", -"targetCohortId", -"outcomeCohortId", 
                                    -"cohortType") %>%
         dplyr::relocate("databaseName", .after = "covariateName")
+
+      # fill missing values with 0
+      res[is.na(res)] <- 0
+
     }
 
     shiny::incProgress(4/4, detail = paste("Done"))