tests/testthat/test-stylest_fit_speaker.R

library(stylest)

test_that("invalid smooth raises error", {
  expect_error(stylest_select_vocab(novels_excerpts, novels_excerpts$author, smooth = -1),
               "smooth value must be greater than or equal to 0")
}
)

Try the stylest package in your browser

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

stylest documentation built on March 5, 2021, 1:05 a.m.