Nothing
# 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")
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.