Seb*_*Seb 2 latex interaction regression r stargazer
我想输出同一行中多个回归的交互项,并将其称为“交互”。到目前为止,我所掌握的是交互项显示在两个不同的行中,称为“交互”(请参见下面的代码)。
这个问题已经在这里被问过,但我的分数还不够高,还不足以对其进行投票或评论:https ://stackoverflow.com/questions/28859569/several-coefficients-in-one-line 。
library("stargazer")
stargazer(attitude)
stargazer(attitude, summary=FALSE)
# 2 OLS models with Interactions
linear.1 <- lm(rating ~ complaints + privileges + complaints*privileges
, data=attitude)
linear.2 <- lm(rating ~ complaints + learning + complaints*learning, data=attitude)
stargazer(linear.1, linear.2, title="Regression Results", type="text",
covariate.labels=c("Complaints", "Privileges", "Interaction", "Learning", "Interaction"))
Run Code Online (Sandbox Code Playgroud)
感谢您的帮助。
我认为这本身并不支持,因为这不是一个好主意。您要求混淆表格中数字的含义,这对您的读者没有帮助。
现在声明了这一点,您可以通过修改对象的内容来做到这一点lm
:
# copy objects just for demonstration
m1 <- linear.1
m2 <- linear.2
# see names of coefficients
names(m1$coefficients)
# [1] "(Intercept)" "complaints" "privileges" "complaints:privileges"
names(m2$coefficients)
# [1] "(Intercept)" "complaints" "learning" "complaints:learning"
# replace names
names(m1$coefficients)[names(m1$coefficients) == "complaints:privileges"] <- "interaction"
names(m2$coefficients)[names(m2$coefficients) == "complaints:learning"] <- "interaction"
Run Code Online (Sandbox Code Playgroud)
结果:
> stargazer(m1, m2, title="Regression Results", type="text")
Regression Results
==========================================================
Dependent variable:
----------------------------
rating
(1) (2)
----------------------------------------------------------
complaints 1.114** 0.307
(0.401) (0.503)
privileges 0.434
(0.570)
learning -0.171
(0.570)
interaction -0.007 0.006
(0.008) (0.009)
Constant -7.737 31.203
(27.409) (31.734)
----------------------------------------------------------
Observations 30 30
R2 0.692 0.713
Adjusted R2 0.657 0.680
Residual Std. Error (df = 26) 7.134 6.884
F Statistic (df = 3; 26) 19.478*** 21.559***
==========================================================
Note: *p<0.1; **p<0.05; ***p<0.01
Run Code Online (Sandbox Code Playgroud)