tests/testthat/test-orsf_print.R

test_that("standard object prints fine", {

 object <- orsf(pbc_orsf, time+status ~ . - id)
 expect_invisible(p <- capture.output(print(object)))

})

Try the aorsf package in your browser

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

aorsf documentation built on Oct. 26, 2023, 5:08 p.m.