Nothing
test_that('updating', {
expect_snapshot(
nearest_neighbor(neighbors = 5) %>%
set_engine("kknn", scale = FALSE) %>%
update(neighbors = tune(), scale = tune())
)
})
test_that('bad input', {
expect_error(nearest_neighbor(mode = "reallyunknown"))
expect_error(nearest_neighbor() %>% set_engine( NULL))
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.