Question

我正在使用R studio Version 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'，而是只打印3 ###。

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

Answer 1

在降价时，标题前必须有空行，因此您只需在\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')
}
```

R chunk中的Markdown语言

1 个答案: