问题描述
我想知道,是否可以使用 modelsummary
对齐笔记两侧的文本。如果笔记看起来与本文 https://www.econ.uzh.ch/dam/jcr:a68d7a76-93af-4ceb-86aa-344d6ee8d0c6/dodging%20the%20taxman%20AEJ%20Applied.pdf 中的笔记相似(特别是与第 151 页上的笔记相似),那就太好了。
在 Markdown 注释中看起来不错。导出到 .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")
解决方法
modelsummary
函数的默认输出是由 kableExtra
包绘制的表格。看起来 kableExtra
支持 LaTeX threeparttable
包,我相信它允许您左右对齐脚注。要了解如何自定义 kableExtra
表,我强烈建议您阅读出色的以 LaTeX 为中心的小插图,其中 can be found on the kableEtra
website。
例如,如果您不喜欢 modelsummary
提供的默认脚注,您可以使用 footnote
中的 kableExtra
函数创建自己的脚注。为此,您需要指定 "latex"
作为输出格式,然后应用 footnote
函数,最后使用 save_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")