与 stargazer 并排报告系数和指数系数

Question

如何在模型输出中添加一列，其中包括系数的取幂值旁边的系数的未取幂值？这是 add.lines 选项的用途吗？谢谢你的帮助。

#load library
library(stargazer)
#sample data
var1<-sample(c('men', 'women'), replace=TRUE, 100, prob=c(0.3, 0.7))
var2<-sample(c('left', 'right'), replace=TRUE, 100, prob=c(0.5, 0.5))
df<-data.frame(gender=var1, vote=var2)
#binomial logistic regression
model1<-glm(vote~gender, data=df, family='binomial')
#report model without
stargazer(model1)
#report model with exponentiated coefficients
stargazer(model1, apply.coef=exp)

Answer 1

可能有更好的方法，但是像这样的快速破解呢：

model1Exp = model1 
model1Exp$coefficients = exp(model1Exp$coefficients)

stargazer(model1, model1Exp)

您需要调整默认标签以标记第二个模型与第一个模型相同但具有指数系数的事实。