Skip to content

Decision trees, using C5.0

Source: vignettes/C5.0.Rmd
C5.0.Rmd
Function Works
tidypredict_fit(), tidypredict_sql(), parse_model() ✔
tidypredict_to_column() ✔
tidypredict_test() ✔
tidypredict_interval(), tidypredict_sql_interval() ✗
parsnip ✔

How it works

Here is a simple C5.0() classification model using the mtcars dataset:

library(dplyr)
library(tidypredict)
library(C50)

mtcars2 <- mtcars
mtcars2$vs <- factor(mtcars2$vs)

model <- C5.0(mtcars2[, c("wt", "cyl", "mpg")], mtcars2$vs)

Under the hood

C5.0 stores its fitted tree as text in the tree element of the model object. tidypredict parses that text directly, so the model can be translated even when it was fitted through the x/y interface (as parsnip does).

The tree is transformed into a dplyr, a.k.a. Tidy Eval, formula. The decision tree becomes a nested dplyr::case_when() statement.

tidypredict_fit(model)
#> case_when(is.na(wt) | is.na(cyl) ~ case_when(case_when(is.na(cyl) ~ 
#>     0.5625, cyl <= 6.00000023841858 ~ 1, .default = 0) * (case_when(is.na(cyl) ~ 
#>     0.611111111111111, cyl <= 4.00000023841858 ~ 1, .default = 0) * 
#>     0.0909090909090909 + (1 - case_when(is.na(cyl) ~ 0.611111111111111, 
#>     cyl <= 4.00000023841858 ~ 1, .default = 0)) * (case_when(is.na(wt) ~ 
#>     0.428571428571429, wt <= 2.87500011920929 ~ 1, .default = 0) * 
#>     1 + (1 - case_when(is.na(wt) ~ 0.428571428571429, wt <= 2.87500011920929 ~ 
#>     1, .default = 0)) * 0)) + (1 - case_when(is.na(cyl) ~ 0.5625, 
#>     cyl <= 6.00000023841858 ~ 1, .default = 0)) * 1 >= case_when(is.na(cyl) ~ 
#>     0.5625, cyl <= 6.00000023841858 ~ 1, .default = 0) * (case_when(is.na(cyl) ~ 
#>     0.611111111111111, cyl <= 4.00000023841858 ~ 1, .default = 0) * 
#>     0.909090909090909 + (1 - case_when(is.na(cyl) ~ 0.611111111111111, 
#>     cyl <= 4.00000023841858 ~ 1, .default = 0)) * (case_when(is.na(wt) ~ 
#>     0.428571428571429, wt <= 2.87500011920929 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(wt) ~ 0.428571428571429, wt <= 2.87500011920929 ~ 
#>     1, .default = 0)) * 1)) + (1 - case_when(is.na(cyl) ~ 0.5625, 
#>     cyl <= 6.00000023841858 ~ 1, .default = 0)) * 0 ~ "0", .default = "1"), 
#>     .default = case_when(cyl <= 6.00000023841858 ~ case_when(cyl <= 
#>         4.00000023841858 ~ "1", .default = case_when(wt <= 2.87500011920929 ~ 
#>         "0", .default = "1")), .default = "0"))

From there, the Tidy Eval formula can be used anywhere it can be evaluated. tidypredict provides three paths:

  • Use directly inside dplyr, mutate(mtcars2, !! tidypredict_fit(model))
  • Use tidypredict_to_column(model) to add it to a piped command set
  • Use tidypredict_sql(model, con) to retrieve the SQL statement

Categorical predictors

C5.0 handles categorical predictors natively. The generated formula uses %in% for categorical splits, and multi-way splits become nested case_when() branches:

mtcars3 <- mtcars2
mtcars3$gear <- factor(mtcars3$gear)

model_cat <- C5.0(mtcars3[, c("wt", "gear", "mpg")], mtcars3$vs)
tidypredict_fit(model_cat)
#> case_when(is.na(mpg) ~ case_when(case_when(is.na(mpg) ~ 0.625, 
#>     mpg <= 21.0000009536743 ~ 1, .default = 0) * 0.85 + (1 - 
#>     case_when(is.na(mpg) ~ 0.625, mpg <= 21.0000009536743 ~ 1, 
#>         .default = 0)) * 0.0833333333333333 >= case_when(is.na(mpg) ~ 
#>     0.625, mpg <= 21.0000009536743 ~ 1, .default = 0) * 0.15 + 
#>     (1 - case_when(is.na(mpg) ~ 0.625, mpg <= 21.0000009536743 ~ 
#>         1, .default = 0)) * 0.916666666666667 ~ "0", .default = "1"), 
#>     .default = case_when(mpg <= 21.0000009536743 ~ "0", .default = "1"))

parsnip

tidypredict also supports C5.0 model objects fitted via the parsnip package, both as a decision_tree() and as a boosted boost_tree().

library(parsnip)

parsnip_model <- decision_tree(mode = "classification") |>
  set_engine("C5.0") |>
  fit(vs ~ wt + cyl + mpg, data = mtcars2)

tidypredict_fit(parsnip_model)
#> case_when(is.na(wt) | is.na(cyl) ~ case_when(case_when(is.na(cyl) ~ 
#>     0.5625, cyl <= 6.00000023841858 ~ 1, .default = 0) * (case_when(is.na(cyl) ~ 
#>     0.611111111111111, cyl <= 4.00000023841858 ~ 1, .default = 0) * 
#>     0.0909090909090909 + (1 - case_when(is.na(cyl) ~ 0.611111111111111, 
#>     cyl <= 4.00000023841858 ~ 1, .default = 0)) * (case_when(is.na(wt) ~ 
#>     0.428571428571429, wt <= 2.87500011920929 ~ 1, .default = 0) * 
#>     1 + (1 - case_when(is.na(wt) ~ 0.428571428571429, wt <= 2.87500011920929 ~ 
#>     1, .default = 0)) * 0)) + (1 - case_when(is.na(cyl) ~ 0.5625, 
#>     cyl <= 6.00000023841858 ~ 1, .default = 0)) * 1 >= case_when(is.na(cyl) ~ 
#>     0.5625, cyl <= 6.00000023841858 ~ 1, .default = 0) * (case_when(is.na(cyl) ~ 
#>     0.611111111111111, cyl <= 4.00000023841858 ~ 1, .default = 0) * 
#>     0.909090909090909 + (1 - case_when(is.na(cyl) ~ 0.611111111111111, 
#>     cyl <= 4.00000023841858 ~ 1, .default = 0)) * (case_when(is.na(wt) ~ 
#>     0.428571428571429, wt <= 2.87500011920929 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(wt) ~ 0.428571428571429, wt <= 2.87500011920929 ~ 
#>     1, .default = 0)) * 1)) + (1 - case_when(is.na(cyl) ~ 0.5625, 
#>     cyl <= 6.00000023841858 ~ 1, .default = 0)) * 0 ~ "0", .default = "1"), 
#>     .default = case_when(cyl <= 6.00000023841858 ~ case_when(cyl <= 
#>         4.00000023841858 ~ "1", .default = case_when(wt <= 2.87500011920929 ~ 
#>         "0", .default = "1")), .default = "0"))

Boosted models

C5.0 can boost several trees together, which parsnip exposes through boost_tree(). Each trial casts a confidence-weighted vote, and the class with the greatest total vote is predicted. tidypredict reproduces this by summing the per-trial votes and picking the winning class:

boosted_model <- boost_tree(mode = "classification", trees = 5) |>
  set_engine("C5.0") |>
  fit(Species ~ ., data = iris)

tidypredict_fit(boosted_model)
#> case_when(is.na(Petal.Length) | is.na(Petal.Width) | is.na(Sepal.Length) | 
#>     is.na(Sepal.Width) ~ case_when(dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.979166666666667 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.0217391304347826) & case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.0208333333333333 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.978260869565217), ((case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46)) * (case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.888888888888889, Petal.Length <= 4.90000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0)) + 0.333333333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) > case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) & case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>         0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>         1, .default = 0) * 0.0759692879281827 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>         1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 1), ((case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 37.8425 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 6.05479)) + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.770564607805987, Petal.Width <= 
#>         1.80000001192093 ~ 1, .default = 0)) * 25.7329)) * (case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0)) + 0.252283333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 37.8425 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 6.05479)) + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.770564607805987, Petal.Width <= 
#>         1.80000001192093 ~ 1, .default = 0)) * 25.7329) + 1), 
#>     0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 0) > case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.287547087822806 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.86556377776652) & 
#>     case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.191865333333333, Petal.Length <= 1.90000003576279 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         0 + (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0) >= case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>         Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>         0 + (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>         Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>             1.70000010728836 ~ 1, .default = 0) * 0.712452912177194 + 
#>             (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>                 Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>                 0.13443622223348), ((case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 28.7798 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 65.3566 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 55.86359)) * (case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0)) + 0.191865333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 28.7798 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 65.3566 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 55.86359) + 1), 
#>     0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 0.154098666666667, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.154098666666667, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) > case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1)) & case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) >= case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)), ((case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608))) * (case_when(is.na(Petal.Length) ~ 0.154098666666667, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.154098666666667, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0))) + 0.154098666666667)/(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608)) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     1 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0)) * 0) > case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>         Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 1 + 
#>         (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>             Petal.Width <= 1.6000000834465 ~ 1, .default = 0)) * 
#>             0.369899033354622) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0)) * 0.250347576786932) & case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     1 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0)) * 0) >= case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>         Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + 
#>         (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>             Petal.Width <= 1.6000000834465 ~ 1, .default = 0)) * 
#>             0.630100966645378) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0)) * 0.749652423213068), ((case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     17.7987 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 24.08122) + (1 - 
#>     case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 67.1794)) * (case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     1 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0)) * 0)) + 0.118658)/(case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     17.7987 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 24.08122) + (1 - 
#>     case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 67.1794) + 1), 
#>     0) >= dplyr::if_else(case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.979166666666667 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.0217391304347826) > case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0) & case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.979166666666667 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0.0217391304347826) >= case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.0208333333333333 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.978260869565217), ((case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46)) * (case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.979166666666667 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.0217391304347826)) + 0.333333333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         0 + (1 - case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>             5.30000042915344 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>             1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 0) & case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>         0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>         1, .default = 0) * 0.0759692879281827 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>         1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 1), ((case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 37.8425 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 6.05479)) + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.770564607805987, Petal.Width <= 
#>         1.80000001192093 ~ 1, .default = 0)) * 25.7329)) * (case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0)) + 0.434646)/(case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 37.8425 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>             5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>                 Petal.Length <= 5.30000042915344 ~ 1, .default = 0)) * 
#>                 6.05479)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 25.7329) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.712452912177194 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.13443622223348) > 
#>     case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.191865333333333, Petal.Length <= 1.90000003576279 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         0.287547087822806 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 0.86556377776652) & case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.712452912177194 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.13443622223348) > 
#>     case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.191865333333333, Petal.Length <= 1.90000003576279 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         0 + (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0), ((case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 28.7798 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 65.3566 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 55.86359)) * (case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.712452912177194 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.13443622223348)) + 
#>     0.360490666666667)/(case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 28.7798 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 65.3566 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 55.86359) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) > case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1)) & case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) > case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)), ((case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608))) * (case_when(is.na(Petal.Length) ~ 0.154098666666667, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.154098666666667, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0))) + 0.326440666666667)/(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608)) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 1 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.369899033354622) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.250347576786932) >= 
#>     case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>             4.80000042915344 ~ 1, .default = 0) * (case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>             1, .default = 0)) * 0) & case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 1 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.369899033354622) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.250347576786932) >= 
#>     case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>             4.80000042915344 ~ 1, .default = 0) * (case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0)) * 0.630100966645378) + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>             1, .default = 0)) * 0.749652423213068), ((case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     17.7987 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 24.08122) + (1 - 
#>     case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 67.1794)) * (case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 1 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.369899033354622) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.250347576786932)) + 
#>     0.444443333333333)/(case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 17.7987 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>         Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>         (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>             Petal.Width <= 1.6000000834465 ~ 1, .default = 0)) * 
#>             24.08122) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0)) * 67.1794) + 1), 0) & dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.979166666666667 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.0217391304347826) & case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.0208333333333333 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.978260869565217), ((case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46)) * (case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.888888888888889, Petal.Length <= 4.90000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0)) + 0.333333333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) > case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) & case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>         0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>         1, .default = 0) * 0.0759692879281827 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>         1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 1), ((case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 37.8425 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 6.05479)) + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.770564607805987, Petal.Width <= 
#>         1.80000001192093 ~ 1, .default = 0)) * 25.7329)) * (case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0)) + 0.252283333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 37.8425 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 6.05479)) + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.770564607805987, Petal.Width <= 
#>         1.80000001192093 ~ 1, .default = 0)) * 25.7329) + 1), 
#>     0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 0) > case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.287547087822806 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.86556377776652) & 
#>     case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.191865333333333, Petal.Length <= 1.90000003576279 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         0 + (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0) >= case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>         Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>         0 + (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>         Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>             1.70000010728836 ~ 1, .default = 0) * 0.712452912177194 + 
#>             (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>                 Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>                 0.13443622223348), ((case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 28.7798 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 65.3566 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 55.86359)) * (case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0)) + 0.191865333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 28.7798 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 65.3566 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 55.86359) + 1), 
#>     0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 0.154098666666667, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.154098666666667, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) > case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1)) & case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) >= case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)), ((case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608))) * (case_when(is.na(Petal.Length) ~ 0.154098666666667, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.154098666666667, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0))) + 0.154098666666667)/(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608)) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     1 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0)) * 0) > case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>         Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 1 + 
#>         (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>             Petal.Width <= 1.6000000834465 ~ 1, .default = 0)) * 
#>             0.369899033354622) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0)) * 0.250347576786932) & case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     1 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0)) * 0) >= case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>         Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + 
#>         (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>             Petal.Width <= 1.6000000834465 ~ 1, .default = 0)) * 
#>             0.630100966645378) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0)) * 0.749652423213068), ((case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     17.7987 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 24.08122) + (1 - 
#>     case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 67.1794)) * (case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     1 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0)) * 0)) + 0.118658)/(case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     17.7987 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 24.08122) + (1 - 
#>     case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 67.1794) + 1), 
#>     0) >= dplyr::if_else(case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.0208333333333333 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.978260869565217) > case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0) & case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0208333333333333 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0.978260869565217) > case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.979166666666667 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.0217391304347826), ((case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46)) * (case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.0208333333333333 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.978260869565217)) + 0.333333333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.0759692879281827 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     1) > case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) & case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.0759692879281827 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     1) > case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0), ((case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 37.8425 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>             5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>                 Petal.Length <= 5.30000042915344 ~ 1, .default = 0)) * 
#>                 6.05479)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 25.7329)) * (case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.0759692879281827 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     1)) + 0.313070666666667)/(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 37.8425 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 6.05479)) + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.770564607805987, Petal.Width <= 
#>         1.80000001192093 ~ 1, .default = 0)) * 25.7329) + 1), 
#>     0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 0.287547087822806 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 0.86556377776652) >= case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0) & case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.287547087822806 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.86556377776652) >= 
#>     case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.191865333333333, Petal.Length <= 1.90000003576279 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         0.712452912177194 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 0.13443622223348), ((case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 28.7798 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 65.3566 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 55.86359)) * (case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.287547087822806 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.86556377776652)) + 
#>     0.447644)/(case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 28.7798 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 65.3566 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 55.86359) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1)) >= case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) & case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1)) >= case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)), ((case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608))) * (case_when(is.na(Petal.Length) ~ 0.154098666666667, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.154098666666667, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1))) + 0.519460666666667)/(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608)) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.630100966645378) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.749652423213068) > 
#>     case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>             4.80000042915344 ~ 1, .default = 0) * (case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0)) * 0.369899033354622) + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>             1, .default = 0)) * 0.250347576786932) & case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.630100966645378) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.749652423213068) > 
#>     case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>             4.80000042915344 ~ 1, .default = 0) * (case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>             1, .default = 0)) * 0), ((case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     17.7987 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 24.08122) + (1 - 
#>     case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 67.1794)) * (case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.630100966645378) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.749652423213068)) + 
#>     0.436898666666667)/(case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 17.7987 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>         Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>         (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>             Petal.Width <= 1.6000000834465 ~ 1, .default = 0)) * 
#>             24.08122) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0)) * 67.1794) + 1), 0) ~ "setosa", dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.979166666666667 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0.0217391304347826) > case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.888888888888889, Petal.Length <= 4.90000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0) & case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.979166666666667 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.0217391304347826) >= case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0208333333333333 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0.978260869565217), ((case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 50 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.888888888888889, Petal.Length <= 4.90000033378601 ~ 
#>             1, .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         46)) * (case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.979166666666667 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.0217391304347826)) + 0.333333333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         0 + (1 - case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>             5.30000042915344 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>             1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 0) & case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) >= case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>         0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>         1, .default = 0) * 0.0759692879281827 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.920113957993921, Petal.Length <= 5.30000042915344 ~ 
#>         1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 1), ((case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 37.8425 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 6.05479)) + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.770564607805987, Petal.Width <= 
#>         1.80000001192093 ~ 1, .default = 0)) * 25.7329)) * (case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0)) + 0.434646)/(case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 37.8425 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>             5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>                 Petal.Length <= 5.30000042915344 ~ 1, .default = 0)) * 
#>                 6.05479)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 25.7329) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.712452912177194 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.13443622223348) > 
#>     case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.191865333333333, Petal.Length <= 1.90000003576279 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         0.287547087822806 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 0.86556377776652) & case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.712452912177194 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.13443622223348) > 
#>     case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.191865333333333, Petal.Length <= 1.90000003576279 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         0 + (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0), ((case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 28.7798 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 65.3566 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 55.86359)) * (case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.712452912177194 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.13443622223348)) + 
#>     0.360490666666667)/(case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 28.7798 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 65.3566 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 55.86359) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) > case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1)) & case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) > case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)), ((case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608))) * (case_when(is.na(Petal.Length) ~ 0.154098666666667, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.154098666666667, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0))) + 0.326440666666667)/(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608)) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 1 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.369899033354622) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.250347576786932) >= 
#>     case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>             4.80000042915344 ~ 1, .default = 0) * (case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>             1, .default = 0)) * 0) & case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 1 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.369899033354622) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.250347576786932) >= 
#>     case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>             4.80000042915344 ~ 1, .default = 0) * (case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0)) * 0.630100966645378) + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>             1, .default = 0)) * 0.749652423213068), ((case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     17.7987 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 24.08122) + (1 - 
#>     case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 67.1794)) * (case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 1 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.369899033354622) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.250347576786932)) + 
#>     0.444443333333333)/(case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 17.7987 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>         Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>         (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>             Petal.Width <= 1.6000000834465 ~ 1, .default = 0)) * 
#>             24.08122) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0)) * 67.1794) + 1), 0) >= dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0208333333333333 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0.978260869565217) > case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.888888888888889, Petal.Length <= 4.90000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0) & case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.0208333333333333 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.978260869565217) > case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.979166666666667 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 0.333333333333333) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     0.0217391304347826), ((case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 50 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.888888888888889, Petal.Length <= 4.90000033378601 ~ 
#>             1, .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         46)) * (case_when(is.na(Petal.Length) ~ 0.333333333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.333333333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         (case_when(is.na(Petal.Length) ~ 0.888888888888889, Petal.Length <= 
#>             4.90000033378601 ~ 1, .default = 0) * 0.0208333333333333 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.888888888888889, 
#>                 Petal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>                 0.666666666666667) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>         0.978260869565217)) + 0.333333333333333)/(case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 50 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.333333333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.54, Petal.Width <= 
#>     1.70000010728836 ~ 1, .default = 0) * (case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 48 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.888888888888889, Petal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * 6) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.54, Petal.Width <= 1.70000010728836 ~ 1, .default = 0)) * 
#>     46) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.0759692879281827 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     1) > case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.0711869591074892 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.924030712071817 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0) & case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.0759692879281827 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     1) > case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 0)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     0), ((case_when(is.na(Petal.Length) ~ 0.252283333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 37.8425 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.252283333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0) * 
#>         10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 0.123018711941775, 
#>         Sepal.Length <= 4.90000033378601 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>             5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>             (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>                 Petal.Length <= 5.30000042915344 ~ 1, .default = 0)) * 
#>                 6.05479)) + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.770564607805987, Petal.Width <= 1.80000001192093 ~ 
#>         1, .default = 0)) * 25.7329)) * (case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 0.928813040892511 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 0.0759692879281827 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 1)) + (1 - case_when(is.na(Petal.Width) ~ 
#>     0.770564607805987, Petal.Width <= 1.80000001192093 ~ 1, .default = 0)) * 
#>     1)) + 0.313070666666667)/(case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 37.8425 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.252283333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.770564607805987, 
#>     Petal.Width <= 1.80000001192093 ~ 1, .default = 0) * (case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0) * 10.631849 + (1 - case_when(is.na(Sepal.Length) ~ 
#>     0.123018711941775, Sepal.Length <= 4.90000033378601 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Length) ~ 0.920113957993921, 
#>     Petal.Length <= 5.30000042915344 ~ 1, .default = 0) * 69.73805 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.920113957993921, Petal.Length <= 
#>         5.30000042915344 ~ 1, .default = 0)) * 6.05479)) + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.770564607805987, Petal.Width <= 
#>         1.80000001192093 ~ 1, .default = 0)) * 25.7329) + 1), 
#>     0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 0.287547087822806 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 0.86556377776652) >= case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0) & case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.287547087822806 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.86556377776652) >= 
#>     case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.191865333333333, Petal.Length <= 1.90000003576279 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>         Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 
#>         0.712452912177194 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 0.13443622223348), ((case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 28.7798 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 65.3566 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 55.86359)) * (case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.191865333333333, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.539156059728994, 
#>     Petal.Width <= 1.70000010728836 ~ 1, .default = 0) * 0.287547087822806 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.539156059728994, Petal.Width <= 
#>         1.70000010728836 ~ 1, .default = 0)) * 0.86556377776652)) + 
#>     0.447644)/(case_when(is.na(Petal.Length) ~ 0.191865333333333, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 28.7798 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.191865333333333, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0) * 65.3566 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.539156059728994, Petal.Width <= 1.70000010728836 ~ 
#>         1, .default = 0)) * 55.86359) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1)) >= case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Sepal.Length) ~ 
#>             0.894837188797489, Sepal.Length <= 6.40000033378601 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Sepal.Width) ~ 
#>         0.817687273659275, Sepal.Width <= 3.00000011920929 ~ 
#>         1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)) & case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1)) >= case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 1 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.161462277152751 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 1) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.941216591839984) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 0)), ((case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608))) * (case_when(is.na(Petal.Length) ~ 0.154098666666667, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 0 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.154098666666667, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>         0.130438380520344, Petal.Width <= 1.30000001192093 ~ 
#>         1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 0.838537722847249 + 
#>             (1 - case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>                 0) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         0.0587834081600164) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0)) * 1))) + 0.519460666666667)/(case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0) * 23.1148 + (1 - case_when(is.na(Petal.Length) ~ 
#>     0.154098666666667, Petal.Length <= 1.90000003576279 ~ 1, 
#>     .default = 0)) * (case_when(is.na(Petal.Width) ~ 0.130438380520344, 
#>     Petal.Width <= 1.30000001192093 ~ 1, .default = 0) * 16.5507 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.130438380520344, Petal.Width <= 
#>         1.30000001192093 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.781928589878959, Petal.Length <= 5.10000014305115 ~ 
#>         1, .default = 0) * (case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0) * 
#>         (case_when(is.na(Sepal.Length) ~ 0.894837188797489, Sepal.Length <= 
#>             6.40000033378601 ~ 1, .default = 0) * 63.1262 + (1 - 
#>             case_when(is.na(Sepal.Length) ~ 0.894837188797489, 
#>                 Sepal.Length <= 6.40000033378601 ~ 1, .default = 0)) * 
#>             7.4187) + (1 - case_when(is.na(Sepal.Width) ~ 0.817687273659275, 
#>         Sepal.Width <= 3.00000011920929 ~ 1, .default = 0)) * 
#>         15.728792) + (1 - case_when(is.na(Petal.Length) ~ 0.781928589878959, 
#>         Petal.Length <= 5.10000014305115 ~ 1, .default = 0)) * 
#>         24.0608)) + 1), 0) + dplyr::if_else(case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.630100966645378) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.749652423213068) > 
#>     case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>             4.80000042915344 ~ 1, .default = 0) * (case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0)) * 0.369899033354622) + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>             1, .default = 0)) * 0.250347576786932) & case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.630100966645378) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.749652423213068) > 
#>     case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0) * 1 + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * 
#>         (case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>             4.80000042915344 ~ 1, .default = 0) * (case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0) * 0 + (1 - case_when(is.na(Petal.Width) ~ 
#>             0.629644587548322, Petal.Width <= 1.6000000834465 ~ 
#>             1, .default = 0)) * 0) + (1 - case_when(is.na(Petal.Length) ~ 
#>             0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>             1, .default = 0)) * 0), ((case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     17.7987 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>     (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 24.08122) + (1 - 
#>     case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 67.1794)) * (case_when(is.na(Petal.Length) ~ 
#>     0.118658, Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 
#>     0 + (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>     1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>     0.491840095369713, Petal.Length <= 4.80000042915344 ~ 1, 
#>     .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>     Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 0 + (1 - 
#>     case_when(is.na(Petal.Width) ~ 0.629644587548322, Petal.Width <= 
#>         1.6000000834465 ~ 1, .default = 0)) * 0.630100966645378) + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.491840095369713, Petal.Length <= 
#>         4.80000042915344 ~ 1, .default = 0)) * 0.749652423213068)) + 
#>     0.436898666666667)/(case_when(is.na(Petal.Length) ~ 0.118658, 
#>     Petal.Length <= 1.90000003576279 ~ 1, .default = 0) * 17.7987 + 
#>     (1 - case_when(is.na(Petal.Length) ~ 0.118658, Petal.Length <= 
#>         1.90000003576279 ~ 1, .default = 0)) * (case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0) * (case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>         Petal.Width <= 1.6000000834465 ~ 1, .default = 0) * 40.9407 + 
#>         (1 - case_when(is.na(Petal.Width) ~ 0.629644587548322, 
#>             Petal.Width <= 1.6000000834465 ~ 1, .default = 0)) * 
#>             24.08122) + (1 - case_when(is.na(Petal.Length) ~ 
#>         0.491840095369713, Petal.Length <= 4.80000042915344 ~ 
#>         1, .default = 0)) * 67.1794) + 1), 0) ~ "versicolor", 
#>     .default = "virginica"), .default = case_when(case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.986928104575163, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ case_when(Petal.Length <= 4.90000033378601 ~ 
#>     0, .default = 0), .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.980750037544786, .default = case_when(Petal.Width <= 
#>     1.80000001192093 ~ case_when(Sepal.Length <= 4.90000033378601 ~ 
#>     0, .default = case_when(Petal.Length <= 5.30000042915344 ~ 
#>     0, .default = 0)), .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.972862992140086, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ 0, .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.964921901349655, .default = case_when(Petal.Width <= 
#>     1.30000001192093 ~ 0, .default = case_when(Petal.Length <= 
#>     5.10000014305115 ~ case_when(Sepal.Width <= 3.00000011920929 ~ 
#>     case_when(Sepal.Length <= 6.40000033378601 ~ 0, .default = 0), 
#>     .default = 0), .default = 0))) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.953116864464032, .default = case_when(Petal.Length <= 
#>     4.80000042915344 ~ case_when(Petal.Width <= 1.6000000834465 ~ 
#>     0, .default = 0), .default = 0)) >= case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ case_when(Petal.Length <= 4.90000033378601 ~ 
#>     0.965986394557823, .default = 0), .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.80000001192093 ~ case_when(Sepal.Length <= 4.90000033378601 ~ 
#>     0, .default = case_when(Petal.Length <= 5.30000042915344 ~ 
#>     0.917112445140911, .default = 0)), .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ 0.707148809111176, .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.30000001192093 ~ 0.961622081550404, .default = case_when(Petal.Length <= 
#>     5.10000014305115 ~ case_when(Sepal.Width <= 3.00000011920929 ~ 
#>     case_when(Sepal.Length <= 6.40000033378601 ~ 0, .default = 0.919992477064947), 
#>     .default = 0.904467021089548), .default = 0))) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Length <= 
#>     4.80000042915344 ~ case_when(Petal.Width <= 1.6000000834465 ~ 
#>     0.986753757885141, .default = 0), .default = 0)) & case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.986928104575163, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ case_when(Petal.Length <= 4.90000033378601 ~ 
#>     0, .default = 0), .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.980750037544786, .default = case_when(Petal.Width <= 
#>     1.80000001192093 ~ case_when(Sepal.Length <= 4.90000033378601 ~ 
#>     0, .default = case_when(Petal.Length <= 5.30000042915344 ~ 
#>     0, .default = 0)), .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.972862992140086, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ 0, .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.964921901349655, .default = case_when(Petal.Width <= 
#>     1.30000001192093 ~ 0, .default = case_when(Petal.Length <= 
#>     5.10000014305115 ~ case_when(Sepal.Width <= 3.00000011920929 ~ 
#>     case_when(Sepal.Length <= 6.40000033378601 ~ 0, .default = 0), 
#>     .default = 0), .default = 0))) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0.953116864464032, .default = case_when(Petal.Length <= 
#>     4.80000042915344 ~ case_when(Petal.Width <= 1.6000000834465 ~ 
#>     0, .default = 0), .default = 0)) >= case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ case_when(Petal.Length <= 4.90000033378601 ~ 
#>     0, .default = 0.619047619047619), .default = 0.964539007092199)) + 
#>     case_when(Petal.Length <= 1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>         1.80000001192093 ~ case_when(Sepal.Length <= 4.90000033378601 ~ 
#>         0.875877142719671, .default = case_when(Petal.Length <= 
#>         5.30000042915344 ~ 0, .default = 0.902629371911377)), 
#>         .default = 0.974303972508283)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ 0, .default = 0.858214263292205)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.30000001192093 ~ 0, .default = case_when(Petal.Length <= 
#>     5.10000014305115 ~ case_when(Sepal.Width <= 3.00000011920929 ~ 
#>     case_when(Sepal.Length <= 6.40000033378601 ~ 0.833561955435792, 
#>         .default = 0), .default = 0), .default = 0.980825060120454))) + 
#>     case_when(Petal.Length <= 1.90000003576279 ~ 0, .default = case_when(Petal.Length <= 
#>         4.80000042915344 ~ case_when(Petal.Width <= 1.6000000834465 ~ 
#>         0, .default = 0.622397900367951), .default = 0.74506520542373)) ~ 
#>     "setosa", case_when(Petal.Length <= 1.90000003576279 ~ 0, 
#>     .default = case_when(Petal.Width <= 1.70000010728836 ~ case_when(Petal.Length <= 
#>         4.90000033378601 ~ 0.965986394557823, .default = 0), 
#>         .default = 0)) + case_when(Petal.Length <= 1.90000003576279 ~ 
#>     0, .default = case_when(Petal.Width <= 1.80000001192093 ~ 
#>     case_when(Sepal.Length <= 4.90000033378601 ~ 0, .default = case_when(Petal.Length <= 
#>         5.30000042915344 ~ 0.917112445140911, .default = 0)), 
#>     .default = 0)) + case_when(Petal.Length <= 1.90000003576279 ~ 
#>     0, .default = case_when(Petal.Width <= 1.70000010728836 ~ 
#>     0.707148809111176, .default = 0)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.30000001192093 ~ 0.961622081550404, .default = case_when(Petal.Length <= 
#>     5.10000014305115 ~ case_when(Sepal.Width <= 3.00000011920929 ~ 
#>     case_when(Sepal.Length <= 6.40000033378601 ~ 0, .default = 0.919992477064947), 
#>     .default = 0.904467021089548), .default = 0))) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Length <= 
#>     4.80000042915344 ~ case_when(Petal.Width <= 1.6000000834465 ~ 
#>     0.986753757885141, .default = 0), .default = 0)) >= case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ case_when(Petal.Length <= 4.90000033378601 ~ 
#>     0, .default = 0.619047619047619), .default = 0.964539007092199)) + 
#>     case_when(Petal.Length <= 1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>         1.80000001192093 ~ case_when(Sepal.Length <= 4.90000033378601 ~ 
#>         0.875877142719671, .default = case_when(Petal.Length <= 
#>         5.30000042915344 ~ 0, .default = 0.902629371911377)), 
#>         .default = 0.974303972508283)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.70000010728836 ~ 0, .default = 0.858214263292205)) + case_when(Petal.Length <= 
#>     1.90000003576279 ~ 0, .default = case_when(Petal.Width <= 
#>     1.30000001192093 ~ 0, .default = case_when(Petal.Length <= 
#>     5.10000014305115 ~ case_when(Sepal.Width <= 3.00000011920929 ~ 
#>     case_when(Sepal.Length <= 6.40000033378601 ~ 0.833561955435792, 
#>         .default = 0), .default = 0), .default = 0.980825060120454))) + 
#>     case_when(Petal.Length <= 1.90000003576279 ~ 0, .default = case_when(Petal.Length <= 
#>         4.80000042915344 ~ case_when(Petal.Width <= 1.6000000834465 ~ 
#>         0, .default = 0.622397900367951), .default = 0.74506520542373)) ~ 
#>     "versicolor", .default = "virginica"))

Rule-based models

Instead of a tree, C5.0 can produce an ordered set of rules (rules = TRUE), which parsnip exposes through C5_rules(). Each rule that a case satisfies casts a confidence-weighted vote for its class, and the class with the greatest total vote is predicted (the default class wins ties and cases matched by no rule). tidypredict reproduces this by summing the per-rule votes and picking the winning class:

rule_model <- C5.0(iris[, 1:4], iris$Species, rules = TRUE)

tidypredict_fit(rule_model)
#> case_when(dplyr::if_else(!is.na(Petal.Length) & Petal.Length <= 
#>     1.90000003576279, 0.9807692, 0) >= dplyr::if_else(!is.na(Petal.Length) & 
#>     !is.na(Petal.Width) & Petal.Length > 1.90000003576279 & Petal.Length <= 
#>     4.90000033378601 & Petal.Width <= 1.70000010728836, 0.96, 
#>     0) & dplyr::if_else(!is.na(Petal.Length) & Petal.Length <= 
#>     1.90000003576279, 0.9807692, 0) >= dplyr::if_else(!is.na(Petal.Width) & 
#>     Petal.Width > 1.70000010728836, 0.9583333, 0) + dplyr::if_else(!is.na(Petal.Length) & 
#>     Petal.Length > 4.90000033378601, 0.9375, 0) ~ "setosa", dplyr::if_else(!is.na(Petal.Length) & 
#>     !is.na(Petal.Width) & Petal.Length > 1.90000003576279 & Petal.Length <= 
#>     4.90000033378601 & Petal.Width <= 1.70000010728836, 0.96, 
#>     0) >= dplyr::if_else(!is.na(Petal.Width) & Petal.Width > 
#>     1.70000010728836, 0.9583333, 0) + dplyr::if_else(!is.na(Petal.Length) & 
#>     Petal.Length > 4.90000033378601, 0.9375, 0) ~ "versicolor", 
#>     .default = "virginica")

Limitations

Some options change how C5.0 predicts in ways that cannot be expressed as a hard-split case_when(), so they raise an error: fuzzy thresholds (fuzzyThreshold = TRUE), models fitted with a cost matrix (costs), and boosted rule-based models (rules = TRUE with trials > 1).