tests/testthat/test-is_centered.R

test_that("centered checks work", {
  expect_true(is_centered(scaled_sum_code(2)))
  expect_true(is_centered(scaled_sum_code(4)))
  expect_true(is_centered(sum_code(4)))
  expect_true(is_centered(helmert_code(2)))
  expect_true(is_centered(contr.poly(2)))
  expect_false(is_centered(contr.treatment(2)))
})

Try the contrastable package in your browser

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

contrastable documentation built on Oct. 1, 2024, 5:07 p.m.