tests/testthat/test-anova.R

# Make sure that it returns an rms anova
test_that("It is an anova.rms object", {
  expect_equal(inherits(anova(prostate.crr), "anova.rms"), TRUE)
})

Try the QHScrnomo package in your browser

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

QHScrnomo documentation built on May 29, 2024, 9:21 a.m.