fixing when target = outcome

In the case of recurrent events, where target = outcome, we still want to extract these data. so I have removed the check for this condition to allow for these results to be generated, if present
OHDSI · Oct 9, 2024 · 5b932c5 · 5b932c5
1 parent 4761436
commit 5b932c5
Showing 1 changed file with 7 additions and 5 deletions.
diff --git a/R/characterization-incidence.R b/R/characterization-incidence.R
@@ -614,11 +614,13 @@ characterizationIncidenceServer <- function(
                               shiny::validate("Please wait...")
                             }
 
-                            else if(targetIds()[1] == outcomeIds()[1] &&
-                                    length(targetIds())==1 && length(outcomeIds())==1
-                            ){
-                              shiny::validate("Target and outcome cohorts must differ from each other. Make a different selection.")
-                            }
+                            #causing an issue when we want the same target & outcome for recurrent events
+
+                            # else if(targetIds()[1] == outcomeIds()[1] &&
+                            #         length(targetIds())==1 && length(outcomeIds())==1
+                            # ){
+                            #   shiny::validate("Target and outcome cohorts must differ from each other. Make a different selection.")
+                            # }
 
                             else {
                               result <- getIncidenceData(targetIds = targetIds(),