如何为每列 Stargazer 制作因变量标签
How to make a dependent variable label for each column Stargazer
我想像下面这样格式化我的 stargazer table。
这是我的代码
stargazer(reg_1a, reg_2a, reg_3a, reg_4a, reg_5a, reg_6a, type="text",
dep.var.labels = c("Ed76", "Ed76", "Wages", "Wages", "Wages", "Wages"),
model.names = FALSE,
title = "Table 3",
keep = c("nearc4", "ed76"),
omit.stat = c("rsq", "adj.rsq", "ser", "f"),
single.row = FALSE,
column.separate = c(1,1,1,1,1,1),
multicolumn = TRUE,
column.labels = c("OLS","OLS","OLS", "OLS", "iv", "iv"))
这些是我得到的结果
Table 3
=================================================================
Dependent variable:
----------------------------------------------------
Educ Educ
OLS OLS OLS OLS iv iv
(1) (2) (3) (4) (5) (6)
-----------------------------------------------------------------
nearc4 0.290*** 0.273*** 0.043** 0.048***
(0.081) (0.077) (0.018) (0.018)
ed76 0.027*** 0.035***
(0.004) (0.004)
-----------------------------------------------------------------
Observations 3,613 3,613 3,010 3,010 3,010 3,010
=================================================================
Note: *p<0.1; **p<0.05; ***p<0.01
但这就是我想要的
Table 3
=================================================================
----------------------------------------------------
ed76 ed76 wages wages wages wages
OLS OLS OLS OLS iv iv
(1) (2) (3) (4) (5) (6)
-----------------------------------------------------------------
nearc4 0.290*** 0.273*** 0.043** 0.048***
(0.081) (0.077) (0.018) (0.018)
ed76 0.027*** 0.035***
(0.004) (0.004)
-----------------------------------------------------------------
Observations 3,613 3,613 3,010 3,010 3,010 3,010
=================================================================
Note: *p<0.1; **p<0.05; ***p<0.01
我不确定如何分配部门。每列的可变行。
dep.var.labels
参数仅查找两个值,因为您只有两个不同的因变量。例如,以下代码使用 mtcars
数据集。此代码无法正常工作:
library(stargazer)
data(mtcars)
lm1 <- lm(data=mtcars, mpg ~ cyl)
lm2 <- lm(data=mtcars, mpg ~ disp)
lm3 <- lm(data=mtcars, hp ~ cyl)
lm4 <- lm(data=mtcars, hp ~ disp)
stargazer(lm1, lm2, lm3, lm4,
type = "text",
dep.var.labels = c("mpg", "mpg", "hp", "hp"),
column.labels=c("1", "2", "3", "4"),
column.separate = c(1,1,1,1))
而这段代码生成了正确的标签:
stargazer(lm1, lm2, lm3, lm4,
type = "text",
dep.var.labels = c("mpg", "hp"),
column.labels=c("1", "2", "3", "4"),
column.separate = c(1,1,1,1))
我想像下面这样格式化我的 stargazer table。 这是我的代码
stargazer(reg_1a, reg_2a, reg_3a, reg_4a, reg_5a, reg_6a, type="text",
dep.var.labels = c("Ed76", "Ed76", "Wages", "Wages", "Wages", "Wages"),
model.names = FALSE,
title = "Table 3",
keep = c("nearc4", "ed76"),
omit.stat = c("rsq", "adj.rsq", "ser", "f"),
single.row = FALSE,
column.separate = c(1,1,1,1,1,1),
multicolumn = TRUE,
column.labels = c("OLS","OLS","OLS", "OLS", "iv", "iv"))
这些是我得到的结果
Table 3
=================================================================
Dependent variable:
----------------------------------------------------
Educ Educ
OLS OLS OLS OLS iv iv
(1) (2) (3) (4) (5) (6)
-----------------------------------------------------------------
nearc4 0.290*** 0.273*** 0.043** 0.048***
(0.081) (0.077) (0.018) (0.018)
ed76 0.027*** 0.035***
(0.004) (0.004)
-----------------------------------------------------------------
Observations 3,613 3,613 3,010 3,010 3,010 3,010
=================================================================
Note: *p<0.1; **p<0.05; ***p<0.01
但这就是我想要的
Table 3
=================================================================
----------------------------------------------------
ed76 ed76 wages wages wages wages
OLS OLS OLS OLS iv iv
(1) (2) (3) (4) (5) (6)
-----------------------------------------------------------------
nearc4 0.290*** 0.273*** 0.043** 0.048***
(0.081) (0.077) (0.018) (0.018)
ed76 0.027*** 0.035***
(0.004) (0.004)
-----------------------------------------------------------------
Observations 3,613 3,613 3,010 3,010 3,010 3,010
=================================================================
Note: *p<0.1; **p<0.05; ***p<0.01
我不确定如何分配部门。每列的可变行。
dep.var.labels
参数仅查找两个值,因为您只有两个不同的因变量。例如,以下代码使用 mtcars
数据集。此代码无法正常工作:
library(stargazer)
data(mtcars)
lm1 <- lm(data=mtcars, mpg ~ cyl)
lm2 <- lm(data=mtcars, mpg ~ disp)
lm3 <- lm(data=mtcars, hp ~ cyl)
lm4 <- lm(data=mtcars, hp ~ disp)
stargazer(lm1, lm2, lm3, lm4,
type = "text",
dep.var.labels = c("mpg", "mpg", "hp", "hp"),
column.labels=c("1", "2", "3", "4"),
column.separate = c(1,1,1,1))
而这段代码生成了正确的标签:
stargazer(lm1, lm2, lm3, lm4,
type = "text",
dep.var.labels = c("mpg", "hp"),
column.labels=c("1", "2", "3", "4"),
column.separate = c(1,1,1,1))