x <- dust(lm(mpg ~ qsec + factor(am), data = mtcars))
x
x %>% sprinkle_colnames(term = "Term", statistic = "T")
x %>% sprinkle_colnames("Term", "Estimate", "SE", "T-statistic", "p-value")
if (FALSE) {
# Causes an error due to too few unnamed arguments
x %>% sprinkle_colnames("Term", "Estimate")
}
Run the code above in your browser using DataLab