Removed unused argument for ml_decision_tree_classifier

jyuu · jyuu · commit 73f3e2fac75f · 2019-07-05T08:53:30.000-04:00
diff --git a/R/decision_tree.R b/R/decision_tree.R
@@ -187,8 +187,6 @@ translate.decision_tree <- function(x, engine = x$engine, ...) {
         "if the specification is to be translated.",
         call. = FALSE
       )
-    } else {
-      arg_vals$type <- x$mode
     }
 
     # See "Details" in ?ml_random_forest_classifier. `feature_subset_strategy`

Original file line number	Diff line number	Diff line change
`@@ -187,8 +187,6 @@ translate.decision_tree <- function(x, engine = x$engine, ...) {`
`187`	`187`	`"if the specification is to be translated.",`
`188`	`188`	`call. = FALSE`
`189`	`189`	`)`
`190`		`- } else {`
`191`		`- arg_vals$type <- x$mode`
`192`	`190`	`}`
`193`	`191`
`194`	`192`	# See "Details" in ?ml_random_forest_classifier. `feature_subset_strategy`