R 块中的 Markdown 语言

Markdown language inside R chunk

我使用的是 R studio 版本 0.99.485。 我必须基于一个输入向量做很多报告,所以我决定在 R Markdown (R studio) 中编写 for 循环。

我有一个看起来很容易解决的问题,但我在网上找不到答案。

这是我的代码:

```{r forensis, results='asis', echo=FALSE}
load(file = "E:/data/R/Forensic_reports/fdata.RData")
for (i in 1:length(osobni_podaci$Oib)) {
  cat("### UPIT ZA OIB: ", oibreq[i], '  \n')
  cat('### STATUS OIB-A  \n')
  cat('Status: ',ifelse(oib_status$X_status[i] == 1, 'Aktivan', 'Neaktivan'), '  \n')
  cat('### OSNOVNI PODACI  \n')
  cat("### Ime: ", osobni_podaci$Ime[i], '  \n')
  cat("### Prezime: ", osobni_podaci$Prezime[i], '  \n')
}
```

这是输出:

UPIT ZA OIB: 10755053324
STATUS OIB-A
Status: Aktivan
### OSNOVNI PODACI
### Ime: MISLAV
### Prezime: ŠAGOVAC
### UPIT ZA OIB: 93335620125
### STATUS OIB-A
Status: Aktivan
### OSNOVNI PODACI
### Ime: SUZANA
### Prezime: CESAREC NOETHIG

从输出中看不出,但前 3 行的标题是正确的。

然后,在第 4 行之后,我没有将主题标签 ### 识别为 'Header 3',而是只打印三个 ###.

简而言之,如何在 r 块中保留 markdown 语言规则?

在markdown中,header之前必须有一个空行,所以你只需要在###:

之前添加一个\n
```{r forensis, results='asis', echo=FALSE}
load(file = "E:/data/R/Forensic_reports/fdata.RData")
for (i in 1:length(osobni_podaci$Oib)) {
  cat("\n### UPIT ZA OIB: ", oibreq[i], '  \n')
  cat('\n### STATUS OIB-A  \n')
  cat('Status: ',ifelse(oib_status$X_status[i] == 1, 'Aktivan', 'Neaktivan'), '  \n')
  cat('\n### OSNOVNI PODACI  \n')
  cat("\n### Ime: ", osobni_podaci$Ime[i], '  \n')
  cat("\n### Prezime: ", osobni_podaci$Prezime[i], '  \n')
}
```