R Sweave：从表格中创建tabularx;如何使用打印？

Question

[解决]

目的是从表格表中生成tabularx表。但我现在不知道如何使用print来实现此目的，因为print在创建tabularx之前将表打印到PDF文件。

代码：

t <- read.csv("CSV-Path", header = T, na.strings = c(""), sep = ",")
xT <- xtable(t)
xTx <- strsplit(print(xT, size="\\tiny", caption.placement = "top", include.rownames=FALSE, floating=FALSE), "\n")
xTx <- unlist(xTx)
xTx[4] <- gsub("l", "X", xTx[4])
xTx[4] <- gsub("tabuXar", "tabularx", xTx[4])
xTx[14] <- gsub("tabular", "tabularx", xTx[14])

问题是该表是在第3行打印的。但是我需要使用print来生成真正的表格表，以便可以创建tabularx。

Answer 1

将变量xTx保存为txt.-文件并使用LaTeX加载解决了这个问题。