0

我想知道,是否可以使用modelsummary. 如果笔记看起来与本文中的笔记相似,那就太好了https://www.econ.uzh.ch/dam/jcr:a68d7a76-93af-4ceb-86aa-344d6ee8d0c6/dodging%20the%20taxman%20AEJ%20Applied .pdf(尤其类似于第 151 页上的内容)。

在降价笔记中看起来不错。一旦我导出到 .tex,文本就会有些错位。

这是我使用的代码。

library("modelsummary")

#small example:
x<-rnorm(5)
y<-rnorm(5)
modelsummary(list(lm(y~x),lm(y~x)),notes = "this is my very very very very very very long note this is my very very very very very very long note",output = "test.tex")
4

1 回答 1

1

modelsummary函数的默认输出是包绘制的表格kableExtra。它看起来kableExtra支持 LaTeXthreeparttable包,我相信它允许您左右对齐脚注。要了解如何自定义表格,我强烈建议您阅读网站上以kableExtraLaTeX 为中心的优秀插图。kableEtra

例如,如果您不喜欢 提供的默认脚注,您可以使用from 的函数modelsummary创建自己的脚注。为此,您需要指定输出格式,然后应用函数,最后使用.footnotekableExtra"latex"footnotesave_kable

此代码应该使您非常接近所需的结果,但请注意,它kableExtra允许通过多种方式自定义有关您的表的几乎所有内容:

library("modelsummary")
library("kableExtra")

x<-rnorm(5)
y<-rnorm(5)

m <- list(lm(y~x),lm(y~x))
n <- "this is my very very very very very very long note this is my very very very very very very long note"

modelsummary(m, output = "latex") %>%
    footnote(general = n, threeparttable = TRUE) %>%
    save_kable(file = "~/Downloads/test.tex")

在此处输入图像描述

于 2021-05-03T00:33:59.760 回答