【发布时间】:2019-11-10 21:44:31
【问题描述】:
我想将多个 stargazer 表输出到一个 pdf 文档中,类似于使用 pdf() 函数将多个图输出到一个 pdf 文档中的方式。我想有单独的表格,每个变量都有一个表格,每个变量有多个回归。
我尝试使用 pdf() 函数,然后运行 stargazer 表。
merged <- dataset
pdf("regressions.pdf", width = 12, height = 12)
vars <- a list of dependent vars
reg1_vars <- a list of independent vars for first regression
reg2_vars <- a list of independent vars for second regression
for(var in vars){
formula <- as.formula(paste(var,".new~ .",sep=""))
group1 <- merged[, unlist(lapply(lapply(substr(colnames(merged),1,3),
FUN=grepl, c(var, reg1_vars)), any))]
lm1 <- lm(formula, data = group1)
group2 <- merged[, unlist(lapply(lapply(substr(colnames(merged),1,3),
FUN=grepl, c(var, reg2_vars)), any))]
lm2 <- lm(formula, data = group2)
stargazer(lm1,lm2 out = "table.pdf")
}
dev.off()
由于观星表不是图形,因此它们不会被捕获在 pdf 文件中。
【问题讨论】: