tests/testthat/_snaps/k_means.md

bad input

Code
  k_means(mode = "bogus")
Condition
  Error in `modelenv::check_spec_mode_engine_val()`:
  ! 'bogus' is not a known mode for model `k_means()`.
Code
  bt <- k_means(num_clusters = -1) %>% set_engine("stats")
  fit(bt, mpg ~ ., mtcars)
Condition
  Error in `check_args()`:
  ! The number of centers should be >= 0.
Code
  translate_tidyclust(k_means(), engine = NULL)
Condition
  Error in `translate_tidyclust.default()`:
  ! Please set an engine.
Code
  translate_tidyclust(k_means(formula = ~x))
Condition
  Error in `k_means()`:
  ! unused argument (formula = ~x)

printing

Code
  k_means()
Output
  K Means Cluster Specification (partition)

  Computational engine: stats
Code
  k_means(num_clusters = 10)
Output
  K Means Cluster Specification (partition)

  Main Arguments:
    num_clusters = 10

  Computational engine: stats

updating

Code
  k_means(num_clusters = 5) %>% update(num_clusters = tune())
Output
  K Means Cluster Specification (partition)

  Main Arguments:
    num_clusters = tune()

  Computational engine: stats

errors if num_clust isn't specified

Code
  k_means() %>% set_engine("stats") %>% fit(~., data = mtcars)
Condition
  Error in `fit()`:
  ! Please specify `num_clust` to be able to fit specification.
Code
  k_means() %>% set_engine("ClusterR") %>% fit(~., data = mtcars)
Condition
  Error in `tidyclust::.k_means_fit_ClusterR()`:
  ! argument "clusters" is missing, with no default


Try the tidyclust package in your browser

Any scripts or data that you put into this service are public.

tidyclust documentation built on Sept. 26, 2023, 1:08 a.m.