rmarkDown主持人：循环循环，包含UTF-8编码的弹力

Question

是否可以在包含UTF-8编码的可弹力的循环中包括一个子文件？

这是我的yaml：

---
output: officedown::rdocx_document
---

如果不使用循环，它可以完美工作，而delta（“ \ u0394”）在输出文件中正确显示：

```{r, echo = FALSE, message = FALSE}
library(flextable)

# Create columns
col1 <- c("a", "\U0394")
col2 <- c(1.0, 2.0)

# Create dataframe
data <- data.frame(Parameter = col1,
                   Value = col2)

# Create flextable
ft <- flextable(data)
ft
```

要循环通过此flextable，我将上面的代码保存为子文件，并将其包含在一个中ASIS-chunk带有 knit_child（） ...

```{r, echo = FALSE, message = FALSE, results = "asis"}
library(rmarkdown)
library(knitr)
library(flextable)

# Read child doc two times
for (i in 1:2){
  out <- knit_child("path_to_child\\child.Rmd", quiet = TRUE)
  cat(out)
  cat("\n\n")
}
```

...但随后得到此错误，因为UTF-8编码已不再识别：

Error in read_xml.character(file) : error parsing attribute name [68]

Answer 1

我在循环中使用“ \ u226570”的经验。这是由于系统语言环境的各个方面。遵循以下内容：

1. 使用 sessionInfo（）并检查语言环境信息。
2. 将语言环境更改为 English_united States.utf8 或其他UTF8样式（例如 en_gb.utf-8 ），如果尚未设置它们。您可以使用 sys.setlocale（“ lc_all”，“ English_united States.utf8”）来执行此操作。
3. 再次检查会话信息，如果环境设置仍未改变，则可能不支持UTF-8（例如，更新版本的 Windows 具有更好的UTF-8支持）。

我认为您的问题将在设置有效的UTF-8语言环境后得到解决。

Answer 2

您需要使用 flextable_to_rmd 。

请参阅：

• https://davidgohel.github.io/flextable/reference/reference/flextable_to_rmd.html

您必须在“ path_to_to_to_to_to_to_child/child.rmd”：

```{r, echo = FALSE, message = FALSE, results='asis'}
library(flextable)

# Create columns
col1 <- c("a", "\U0394")
col2 <- c(1.0, 2.0)

# Create dataframe
data <- data.frame(Parameter = col1,
                   Value = col2)

# Create flextable
ft <- flextable(data)

flextable_to_rmd(ft)
```