ignore interactions in name check

hiredd · May 29, 2017 · 3bd74f3 · 3bd74f3
1 parent 98709fd
commit 3bd74f3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/formula.R b/R/formula.R
@@ -21,7 +21,7 @@ parse.formula <- function(formula, data) {
   interaction_idx <- grepl(":", independent_vars)
 
   ## Error if illegal column name
-  if (!all(make.names(independent_vars) == independent_vars)) {
+  if (!all(make.names(independent_vars[!interaction_idx]) == independent_vars[!interaction_idx])) {
     stop("Error: Illegal column names in formula interface. Fix column names or use alternative interface in ranger.")
   }