有没有办法在页面中显示扫帚功能的结果？答案

【问题标题】：Is there any way to show results of broom functions in a page?有没有办法在页面中显示扫帚功能的结果？
【发布时间】：2020-01-29 12:25:26
【问题描述】：

我使用的是函数包broom。但结果跨越多个页面。例如，使用mtcars 数据，我用

拟合了一个线性模型

model1 <- lm(mpg~. , data=mtcars) # mpg regressed on all other variables of dataset.

我想使用broom::glance 函数查看回归结果（如 R-squared、AIC 等），但显示回归结果的表格比页面宽度宽。有什么办法可以让剩余的列显示在下一行中？我也尝试了knitr::kable，但这也不起作用。

【问题讨论】：

这样的东西怎么样：glance(model1) %>% select(r.squared, AIC)?

标签： r broom

【解决方案1】：

如果你想在控制台中看到它，你可以这样做：

options(width=140)
glance(mdl)

或

data.frame(glance(mdl))

【讨论】：

【解决方案2】：

您可以使用以下代码将输出保存在 .csv 文件中

library(broom)

model1 <- lm(mpg~., data=mtcars)
tmp <- glance(model1)
#To have the result in the console
write.csv(tmp)
#To write the results in .csv file
write.csv(tmp, "lm_results.csv")

【讨论】：

这是一个不错的主意，但我想将结果保存在 R markdown 文档中以保持可重复性。写 csv 文件不符合我的目的。