tests/testthat/test-roxytest-testexamples-get_models.R

# Generated by roxytest: Do not edit by hand!

context("File R/get_models.R: @testexamples")

test_that("Function get_models() @ L16", {
  
  library(survival)
  zz <- ezcox(lung, covariates = c("sex", "ph.ecog"), controls = "age", return_models = TRUE)
  mds <- get_models(zz)
  str(mds, max.level = 1)
  expect_s3_class(mds, "ezcox_models")
})

Try the ezcox package in your browser

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

ezcox documentation built on May 31, 2023, 7:49 p.m.