tests/testthat/_snaps/enn.md

In themis: Extra Recipes Steps for Dealing with Unbalanced Data

kind_sel is validated

Code
  enn(circle_example[, c("x", "y", "class")], "class", kind_sel = "most")
Condition
  Error in `enn()`:
  ! `kind_sel` must be one of "mode" or "all", not "most".
  i Did you mean "mode"?

Code
  step_enn(recipe(class ~ x + y, data = circle_example), class, kind_sel = "most")
Condition
  Error in `step_enn()`:
  ! `kind_sel` must be one of "mode" or "all", not "most".
  i Did you mean "mode"?

warns when both times and all_k are set

Code
  tmp <- enn(circle_example[, c("x", "y", "class")], var = "class", times = 2,
  all_k = TRUE)
Condition
  Warning in `enn()`:
  `times` is ignored when `all_k` is `TRUE`.

Code
  prep(step_enn(recipe(class ~ x + y, data = circle_example), class, times = 2,
  all_k = TRUE))
Condition
  Warning in `prep()`:
  `times` is ignored when `all_k` is `TRUE`.
Message

  -- Recipe ----------------------------------------------------------------------

  -- Inputs 
  Number of variables by role
  outcome:   1
  predictor: 2

  -- Training information 
  Training data contained 400 data points and no incomplete rows.

  -- Operations 
  * ENN based on: class | Trained

errors when not enough observations for neighbors

Code
  bake(prep(step_enn(recipe(class ~ x + y, data = small), class, neighbors = 5,
  skip = FALSE)), new_data = NULL)
Condition
  Error in `step_enn()`:
  Caused by error in `bake()`:
  ! Not enough observations to compute 5 nearest neighbors.
  i 3 observations were found, but 6 are needed.

bad data

Code
  prep(step_enn(rec, x))
Condition
  Error in `step_enn()`:
  Caused by error in `prep()`:
  ! `x` should be a factor variable.

Code
  prep(step_enn(rec, class, id))
Condition
  Error in `step_enn()`:
  Caused by error in `prep()`:
  ! The selector should select at most a single variable.

errors if character are present

Code
  prep(step_enn(recipe(~., data = df_char), x))
Condition
  Error in `step_enn()`:
  Caused by error in `prep()`:
  x All columns selected for the step should be double or integer.
  * 1 factor variable found: `y`

NA in response

Code
  prep(step_enn(recipe(Status ~ Age, data = credit_data0), Status))
Condition
  Error in `step_enn()`:
  Caused by error in `prep()`:
  ! Cannot have any missing values. NAs found in Status.

distance_with errors on non-numeric column

Code
  prep(step_enn(recipe(class ~ ., data = df_mixed), class, distance_with = c(x,
    name)))
Condition
  Error in `step_enn()`:
  Caused by error in `prep()`:
  x All columns selected for the step should be double or integer.
  * 1 factor variable found: `name`

bad distance arg for step_enn()

Code
  bake(prep(step_enn(recipe(class ~ x + y, data = circle_example), class,
  distance = "L2")), new_data = NULL)
Condition
  Error in `step_enn()`:
  ! `distance` must be one of "euclidean", "cosine", "mahalanobis", "manhattan", "chebyshev", "squared_chord", "matusita", "hellinger", "bhattacharyya", "canberra", "soergel", "lorentzian", "jeffreys", "topsoe", "jensen-shannon", "jensen_difference", "taneja", or "kumar-johnson", not "L2".

bad args

Code
  step_enn(recipe(~., data = mtcars), seed = TRUE)
Condition
  Error in `step_enn()`:
  ! `seed` must be a whole number, not `TRUE`.

Code
  prep(step_enn(recipe(class ~ x + y, data = circle_example), class, neighbors = -
  1))
Condition
  Error in `step_enn()`:
  Caused by error in `prep()`:
  ! `neighbors` must be a whole number larger than or equal to 1, not the number -1.

Code
  prep(step_enn(recipe(class ~ x + y, data = circle_example), class, times = -1))
Condition
  Error in `step_enn()`:
  Caused by error in `prep()`:
  ! `times` must be a whole number larger than or equal to 1, not the number -1.

Code
  prep(step_enn(recipe(class ~ x + y, data = circle_example), class, all_k = 1))
Condition
  Error in `step_enn()`:
  Caused by error in `prep()`:
  ! `all_k` must be `TRUE` or `FALSE`, not the number 1.

unused outcome levels are skipped with a warning (#238)

Code
  res <- bake(prep(step_enn(recipe(class ~ x + y, data = circle_example), class)),
  new_data = NULL)
Condition
  Warning in `prep()`:
  Unused factor level "unused" in `class` was dropped.
  i  Level with zero observations is skipped when computing sampling targets.

bake method errors when needed non-standard role columns are missing

Code
  bake(trained, new_data = circle_example[, -3])
Condition
  Error in `step_enn()`:
  ! The following required column is missing from `new_data`: class.

empty printing

Code
  rec
Message

  -- Recipe ----------------------------------------------------------------------

  -- Inputs 
  Number of variables by role
  outcome:    1
  predictor: 10

  -- Operations 
  * ENN based on: <none>

Code
  rec
Message

  -- Recipe ----------------------------------------------------------------------

  -- Inputs 
  Number of variables by role
  outcome:    1
  predictor: 10

  -- Training information 
  Training data contained 32 data points and no incomplete rows.

  -- Operations 
  * ENN based on: <none> | Trained

printing

Code
  print(rec)
Message

  -- Recipe ----------------------------------------------------------------------

  -- Inputs 
  Number of variables by role
  outcome:   1
  predictor: 2

  -- Operations 
  * ENN based on: class

Code
  prep(rec)
Message

  -- Recipe ----------------------------------------------------------------------

  -- Inputs 
  Number of variables by role
  outcome:   1
  predictor: 2

  -- Training information 
  Training data contained 400 data points and no incomplete rows.

  -- Operations 
  * ENN based on: class | Trained

themis documentation built on Aug. 2, 2026, 9:07 a.m.