R to LaTeX - 使用 xtable 生成带换行的长表

Question

我有一个包含大量行 (90) 的表，每行都包含一个名称、一个定义以及另一个文本列。我正在尝试输出到 latex ，以便它跨越多个页面并且也适合页面宽度。

library("xtable")
glossary2<-data.frame(names=letters[1:4],definition=c("very long long long text","very long long long long long text","very long long long long long long text","very long long long text"),include=c(NA,"YES",NA,"NO"))
glossaryprint<-xtable(glossary2,label="tab:codebook",caption="glossary")

进一步到 xtable documentation我已经能够产生以下
要使其适合页面宽度:

align(glossaryprint)<-"lXXX"
print(glossaryprint,tabular.environment="tabularx",width="\\textwidth")

要使其适合多个页面:

print(glossaryprint,tabular.environment="longtable",floating=FALSE)

然而，结合这两种技术给我带来了困难。我想我可能不得不将表格拆分为每张 20 行的表格并使用 tabularx 但这非常笨重并且有很多重复的代码。
当使用 R 函数输出到 Latex 时，是否有人能够建议一种使长表格适合页面宽度和列内换行的方法？

Answer 1

将保持开放以获得更优雅的解决方案，但是......

添加此行允许对列宽进行硬编码

library("xtable")
glossary2 <- data.frame(names=letters[1:4], definition=c("very long long long text","very long long long long long text","very long long long long long long text","very long long long text"), include=c(NA,"YES",NA,"NO"))
glossaryprint <- xtable(glossary2, label="tab:codebook", caption="glossary")

align(glossaryprint) <- "lp{2in}p{3in}p{1in}" #here is the change
print(glossaryprint, tabular.environment="longtable", floating=FALSE)