使用R中的ReporteRs更改docx的脚注中的行距

Question

在word文档中，我希望单行距脚注，而文档正文为1.5行间距。

无论我怎么尝试，脚注间距都保持为1.15，而不是单个间距。

我已经尝试更改脚注的样式，并更改脚注每行周围的填充(将每个脚注视为不同的段落)。样式在脚注上似乎不起作用，将填充改为零仍然在每个“段落”之间保留默认的1.15间距。

我当前的代码：

footnote1 = Footnote()
footnote1 = addParagraph( footnote1,
                          value = pot("footnote text",
                                  textProperties(font.size = 10, font.family = "Arial"))
                        )

doc <- addParagraph( doc, 
                     value = "\tparagraph text" +
                         pot("addfootnotehere.", footnote = footnote1 ) +
                         "more text.", 
                     stylename = "NormalLeft",
                     bookmark = "paragraph1"
                   )

Answer 1

如果您使用自己创建的模板而不是默认的doc <- docx()，您的问题可能会得到解决。

设置一个具有所需间距的模板，保存它，然后使用以下命令调用新创建的模板：

doc <- docx(template = 'D:/docs/template/my_corporate_template.docx')

然后，addFootnote应该读取您的模板大小，而不是自动更正。