tests/testthat/test-find_response.R

test_that("find_response", {
  expect_equal(find_response(y1 + y2 ~ x, combine = FALSE), c("y1", "y2"))
  expect_equal(find_response(y1 + y2 ~ x, combine = TRUE), "y1 + y2")
})

Try the insight package in your browser

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

insight documentation built on Nov. 26, 2023, 5:08 p.m.