我剛剛發現了這個驚人的 R 包，modelsummary.
它似乎沒有提供轉置回歸輸出的能力。
我知道您不能在 內進行轉置kable-extra，這是我在 R 中對普通表輸出的首選。由于modelsummary依賴于kable-extra后處理，我想知道這是否可能。有沒有其他人想通了？
理想情況下，我想保留回歸輸出的星星。這在
uj5u.com熱心網友回復：
group您可以翻轉引數公式 中項的順序。有關許多示例，請參見此處和此處的檔案。
library(modelsummary)
mod <- list(
lm(mpg ~ hp, mtcars),
lm(mpg ~ hp drat, mtcars))
modelsummary(mod, group = model ~ term)
| （截距） | 生命值 | 德拉特 | |
|---|---|---|---|
| 模型 1 | 30.099 | -0.068 | |
| (1.634) | (0.010) | ||
| 模型 2 | 10.790 | -0.052 | 4.698 |
| (5.078) | (0.009) | (1.192) |
這種策略的主要問題是（還）沒有一種自動的方法來附加擬合優度統計資料。因此，您可能必須通過創建 adata.frame并將其提供給add_columns引數來裝配某些東西。例如：
N <- sapply(mod, function(x) get_gof(x)$nobs)
N <- data.frame(N = c(N[1], "", N[2], ""))
modelsummary(mod,
group = model ~ term,
add_columns = N,
align = "lcccc")
| （截距） | 生命值 | 德拉特 | ? | |
|---|---|---|---|---|
| 模型 1 | 30.099 | -0.068 | 32 | |
| (1.634) | (0.010) | |||
| 模型 2 | 10.790 | -0.052 | 4.698 | 32 |
| (5.078) | (0.009) | (1.192) |
如果您對擬合優度統計的最佳默認行為有任何想法，請在 Github 上提交功能請求。
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/414676.html
標籤：