Update R/matching.R

Co-authored-by: miranta-antoniou-roche <85634224+miranta-antoniou-roche@users.noreply.github.com>
hta-pharma · Jul 28, 2023 · 8d0a7a1 · 8d0a7a1
1 parent a9455a5
commit 8d0a7a1
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/R/matching.R b/R/matching.R
@@ -183,6 +183,12 @@ check_weights <- function(optimized, processed_agd, mean_digits = 2, prop_digits
     external_trial = NA,
     internal_trial = NA,
     internal_trial_after_weighted = NA,
+  outdata <- data.frame(
+    covariate = gsub("_CENTERED$", "", match_cov),
+    match_stat = NA,
+    internal_trial = NA,
+    internal_trial_after_weighted = NA,
+     external_trial = NA,
     sum_centered_IPD_with_weights = as.vector(num_check)
   )
   attr(outdata, "footer") <- list()