Как создать таблицу моделей гравитации бок о бок, используя Gravity Package в r - PullRequest
2 голосов
/ 07 августа 2020

Я хотел бы создать таблицу, подобную таблицам из пакета stargazer. Но при использовании Gravity Package для создания гравитационных моделей этот пакет еще не поддерживается пакетом stargazer.

У вас есть идея, как создать похожую таблицу с 3-5 моделями рядом для лучшего сравнение?

Результат должен выглядеть так, только с моделями гравитации из пакета gravity в r:

Желаемый стиль вывода: Желаемый стиль вывода

1 Ответ

1 голос
/ 08 августа 2020

Приведите пример объекта модели, созданного пакетом gravity.

В качестве альтернативы я покажу один подход, который можно использовать: stargazer действительно хорош, и вы МОЖЕТЕ даже создать таблицу, как указано выше, даже с объектами модели которые еще не поддерживаются, например, допустим, что модель квантильной регрессии не поддерживается звездочётом (даже если так и думали):

Уловка в том, что вам нужно иметь возможность получать коэффициенты и стандартную ошибку, например, в виде вектора. Затем предоставьте Stargazer объект модели, который поддерживается, например, lm в качестве шаблона, а затем механически укажите, какие коэффициенты и стандартные ошибки следует использовать:

library(stargazer)
library(tidyverse)
library(quantreg)


df <- mtcars

model1 <- lm(hp ~ factor(gear) + qsec + disp, data = df)
quantreg <- rq(hp ~ factor(gear) + qsec + disp, data = df)
summary_qr <- summary(quantreg, se = "boot")

# Standart Error for quant reg
se_qr = c(211.78266, 29.17307, 58.61105, 9.70908, 0.12090)

stargazer(model1, model1, 
          coef = list(NULL, summary_qr$coefficients),
          se = list(NULL, se_qr),
          type = "text")

...