向rmarkdown文档中添加openxml代码以在word文档中同时包含纵向页面和横向页面

Question

我正在尝试从RMarkdown创建包含横向和纵向页面的Word文档。

由于我们现在可以将openxml代码插入到Word文档中，因此我尝试插入openxml代码段（找到here）以将页面方向从纵向更改为横向。不幸的是，这损坏了word文档，因此我无法打开它。是什么导致这种腐败？我可以使用更好的openxml代码吗？

这是带有openxml代码段的RMarkdown文件的示例。

---
title: "orientation_Test"
output:
    word_document:
        keep_md: true
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

## R Markdown

This is an R Markdown document. 

```{r cars}
summary(cars)
```

## Including Plots

```{=openxml}
       <w:docGrid w:linePitch="360"/>
     </w:sectPr>
   </w:pPr>
 <w:proofErr w:type="spellStart"/>
 <w:proofErr w:type="gramStart"/>
<w:r>
<w:t>asd</w:t>
</w:r>
 <w:proofErr w:type="spellEnd"/>
 <w:proofErr w:type="gramEnd"/>
</w:p>
<w:p w:rsidR="00936EEB" w:rsidRDefault="00152D42">
<w:r>
 <w:t>asd</w:t>
</w:r>
</w:p>
<w:sectPr w:rsidR="00936EEB" w:rsidSect="004D104E">
 <w:pgSz w:w="12240" w:h="15840"/>
<w:sectPr w:rsidR="00936EEB" w:rsidSect="003F2429">
 <w:pgSz w:w="15840" w:h="12240" w:orient="landscape"/>
<w:pgMar w:top="1440" w:right="1440" w:bottom="1440" w:left="1440" w:header="720" w:footer="720" w:gutter="0"/>
<w:cols w:space="720"/>
</w:sectPr>
<w:docGrid w:linePitch="360"/>


```

You can also embed plots, for example:

Note that the `echo = FALSE` parameter was added to the code chunk to prevent printing of the R code that generated the plot.