1.fix bug for duplicate ADURU 2. add function for static forest plot

Merck · May 5, 2024 · 1309979 · 1309979
1 parent 5480f82
commit 1309979
Show file tree

Hide file tree

Showing 4 changed files with 666 additions and 0 deletions.
diff --git a/R/ae_listing.R b/R/ae_listing.R
@@ -170,6 +170,8 @@ format_ae_listing <- function(outdata, display_unique_records = FALSE) {
         }
       }
     }
+    res <- res[,!(names(res) %in% "ADURU")]
+    res_columns <- res_columns[!(res_columns %in% "ADURU")]
   }
 
   # Intensity

diff --git a/R/format_ae_forestly.R b/R/format_ae_forestly.R
@@ -322,6 +322,8 @@ format_ae_forestly <- function(
   outdata$reactable_columns <- columns
   outdata$reactable_columns_group <- columnGroups
   outdata$display <- display
+  outdata$fig_prop_color <- fig_prop_color
+  outdata$fig_diff_color <- fig_diff_color
 
   outdata
 }
-Original file line number
+Diff line change
@@ Expand Up @@
             }
           }
         }
+        res <- res[,!(names(res) %in% "ADURU")]
+        res_columns <- res_columns[!(res_columns %in% "ADURU")]
       }
       # Intensity
@@ Expand Down @@