我试图捕获一些R代码的输出并用乳胶代码替换它.
如果您运行此代码:
library(stargazer)
x <- capture.output(stargazer(mtcars[1:5, 1:3], summary = FALSE, title="The main caption of the table."))
x
Run Code Online (Sandbox Code Playgroud)
这是输出:
[1] ""
[2] "% Table created by stargazer v.5.1 by Marek Hlavac, Harvard University. E-mail: hlavac at fas.harvard.edu"
[3] "% Date and time: Sat, Jun 27, 2015 - 11:36:07"
[4] "\\begin{table}[!htbp] \\centering "
[5] " \\caption{The main caption of the table.} "
[6] " \\label{} "
[7] "\\begin{tabular}{@{\\extracolsep{5pt}} cccc} "
[8] "\\\\[-1.8ex]\\hline "
[9] "\\hline \\\\[-1.8ex] "
[10] " & mpg & …Run Code Online (Sandbox Code Playgroud)