r - 使用 R 中的 ReporteRs 更改 docx 中的行距

Question

我正在使用 R 中的 ReporteRs 包创建一个 word 文档，并且我想将段落的间距从单行距更改为 1.5 行距。

我想我可以将每一行作为一个新段落输入，并在每个“段落”的开头放置一个缓冲区，但我正在寻找一种更清洁的方式。

如果可以的话，我愿意使用另一个包。

Answer 1

您可以在一个空的 Word 文档中定义一个行距为 1.5 的段落（带有 name myparag），并将其用作模板（文件名：）template.docx。

doc <- docx() 
styles( doc ) # check value `myparag` is in the available paragraph styles
doc <- addParagraph(doc, "Blah blah blah", stylename = "myparag")

Answer 2

## docx example 
doc = docx( )

# Footnote definition
par1 = pot("About this reference", textItalic(font.size = 8) )
par2 = pot("Omni ab coalitos pro malivolus obsecrans graviter 
           cum perquisitor perquisitor pericula saepeque inmunibus coalitos ut.", 
           textItalic(font.size = 8) )

Footnote = Footnote( )
Footnote = addParagraph( Footnote, set_of_paragraphs( par1, par2 ), 
  parProperties(padding.top = 15))

# add text in the doc with previously defined footnote
my_pot = pot("Blah blah blah." ) + 
  pot(" Here is a note.", footnote = Footnote)
doc = addParagraph(doc, my_pot )

writeDoc( doc, file = "footnote.docx" )