tests/testthat/test-nice_var.R

test_that("nice_var", {
  expect_snapshot(nice_var(
    data = iris,
    variable = "Sepal.Length",
    group = "Species"
  ))

  # Try on multiple variables
  expect_snapshot(nice_var(
    data = iris,
    variable = names(iris[1:4]),
    group = "Species"
  ))
})

Try the rempsyc package in your browser

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

rempsyc documentation built on July 3, 2024, 5:08 p.m.