使用 stargazer 重命名常数项

Question

我想将对照组均值添加到 Stargazer 中的回归表中。我目前的想法是用控制组均值替换截距并重命名该术语。我知道如何替换截距的值，但有没有办法重命名截距项？用对照组均值代替常数项通常很有用。

library(stargazer)

attitude$treatment <- rbinom(n = 30, size = 1, prob = .5)
lm_model <- lm(rating ~ treatment + complaints + privileges + learning 
           + raises + critical, data=attitude)

#add in control mean
control_mean <- mean(attitude[attitude$treatment == 0, "rating"])
lm_model[["coefficients"]][names(lm_model[["coefficients"]]) == 
                         "(Intercept)"] <- control_mean

stargazer(lm_model)

Answer 1

# Rename intercept
names(lm_model$coefficients)[1]

# Change value of intercept to control_mean
lm_model$coefficients[1] = control_mean

这并不是一个真正的 stargazer 问题，而只是一个关于如何修改模型对象的问题。

使用 stargazer 重命名常数项

Rename constant term using stargazer

r

stargazer