使用R中的ReporteR更改docx中的行間距

Question

我使用R中的ReporteRs包創建Word文檔，並且我想將單個間隔的段落間距改爲1.5間隔。

我想我可以輸入每一行作爲一個新的段落，並在每個「段落」的開始放置一個緩衝區，但我正在尋找一種更乾淨的方式。

我打算使用另一個包，如果它會工作。

Answer 1

您可以在空白Word文檔中定義一個行距爲1.5的段落（名稱爲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")