Create a rich-formatted table from an summary.lm object

Usage

# S3 method for summary.lm
tabularise_default(
  data,
  footer = TRUE,
  lang = getOption("data.io_lang", "en"),
  ...,
  kind = "ft",
  env = parent.frame()
)

Arguments

data: A summary.lm object
footer: If TRUE (by default), add a footer to the table
lang: The natural language to use. The default value can be set with, e.g., options(data.io_lang = "fr") for French.
...: Additional arguments passed to tabularise_coef.summary.lm()
kind: The kind of table to produce: "tt" for tinytable, or "ft" for flextable (default).
env: The environment where to evaluate the model.

Value

A flextable object you can print in different formats (HTML, LaTeX, Word, PowerPoint) or rearrange with the {flextable} functions.

Examples

iris_lm <- lm(data = iris, Petal.Length ~ Sepal.Length)
iris_lm_sum <- summary(iris_lm)
tabularise::tabularise(iris_lm_sum)
Linear model
NA
Term Estimate Standard Error t value p value 
\alpha -7.10 0.5067 -14.0 < 2·10-16 ***
\beta_{}  1.86 0.0859  21.6 < 2·10-16 ***
0 <= '***' < 0.001 < '**' < 0.01 < '*' < 0.05
Residuals range: [-2.477, 2.495]
Residuals standard error: 0.8678 on 148 degrees of freedom
Multiple R2: 0.76   -   adjusted R2: 0.7583
F-statistic: 468.6 on 1 and 148 df   -   p value: < 2.22e-16

Linear model
NA
Term	Estimate	Standard Error	t value	p value
\alpha	-7.10	0.5067	-14.0	< 2·10-16	***
\beta_{}	1.86	0.0859	21.6	< 2·10-16	***
0 <= '*' < 0.001 < '' < 0.01 < '*' < 0.05
Residuals range: [-2.477, 2.495]
Residuals standard error: 0.8678 on 148 degrees of freedom
Multiple R2: 0.76 - adjusted R2: 0.7583
F-statistic: 468.6 on 1 and 148 df - p value: < 2.22e-16