Merge pull request #210 from StochasticTree/jaredsmurray-patch-1

andrewherren · web-flow · commit 384224f8517d · 2025-10-23T12:07:16.000-05:00
Hotfix for bcf.predict without propensity scores
diff --git a/R/bcf.R b/R/bcf.R
@@ -2707,6 +2707,7 @@ predict.bcfmodel <- function(
     }
 
     # Add propensities to covariate set if necessary
+    X_combined <- X
     if (object$model_params$propensity_covariate != "none") {
         X_combined <- cbind(X, propensity)
     }

Original file line number	Diff line number	Diff line change
`@@ -2707,6 +2707,7 @@ predict.bcfmodel <- function(`
`2707`	`2707`	`}`
`2708`	`2708`
`2709`	`2709`	`# Add propensities to covariate set if necessary`
	`2710`	`+ X_combined <- X`
`2710`	`2711`	`if (object$model_params$propensity_covariate != "none") {`
`2711`	`2712`	`X_combined <- cbind(X, propensity)`
`2712`	`2713`	`}`