如何解决有谁知道如何在观星者循环中更新表格标题?
所以我正在尝试使用 stargazer 制作一组回归表;我希望每个都是一个单独的表(不想将每个额外的模型添加为一个新列)。
我制作了以下循环,该循环按某个组运行 OLS,并将所有模型单独存储,并存储在一个大列表中。有谁知道如何将 title=
参数添加到 stargazer (tab) 函数中,以便表名可以与对象名相同?这是我到目前为止所做的,但我现在真的卡住了。
data <- iris
results <- NULL
for (i in unique(iris$Species)) {
subset_i <- subset(data,Species == i)
assign(
paste("model",i,sep = "_"),results[[i]] <- lm(Sepal.Length ~ Sepal.Width + Petal.Width,data = subset_i)
)
}
tab <- function(model) {
stargazer(model,digits = 3,column.sep.width = "1pt",intercept.bottom = T,header = F,no.space = T,object.names = T)
}
for (k in results) {
tab(model = k)
}
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。