Fix to remove a warning

markmfredrickson · Dec 11, 2015 · d7b15d4 · d7b15d4
1 parent b12b199
commit d7b15d4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/mlm.R b/R/mlm.R
@@ -195,7 +195,7 @@ parseMatchingProblem <- function(formula, data, na.action = na.pass, ...) {
 
   mname <- colnames(mf)[isMatch]
 
-  newf <- update(formula, as.formula(paste(".~. -", mname)))
+  newf <- update(formula, as.formula(paste(".~. -", mname)), data=mf)
 
   # now make a new model frame, using the reduce form of the formula
   mf <- model.frame(newf, data, na.action = na.action, ...)