Update R/binary-helper.R

Co-authored-by: Isaac Gravestock <83659704+gravesti@users.noreply.github.com>
hta-pharma · Sep 13, 2024 · 5087eb9 · 5087eb9
1 parent 061d06c
commit 5087eb9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/binary-helper.R b/R/binary-helper.R
@@ -109,7 +109,7 @@ glm_makeup <- function(binobj, legend = "before matching", weighted = FALSE) {
 
   data.frame(
     treatment = ARM,
-    type = rep(legend),
+    type =legend,
     n = N,
     events = N.EVNT,
     `events%` = N.EVNT.PERC,