inst/tinytest/test_lm_to_ptable.R

# WIP

library(lmhelprs)

dat <- data_test1

mod1 <-
"
x2 ~ x1
x3 ~ x2 + x1
"

out1 <- many_lm(mod1, dat)

expect_true(is.data.frame(lm_list_to_partable(out1)))
expect_true(is.data.frame(lm_list_to_partable(out1, ci = TRUE)))

Try the lmhelprs package in your browser

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

lmhelprs documentation built on June 8, 2025, 1:48 p.m.