` `if()`语句中的‘`cat()’会产生不需要的行为

Question

使用以下示例rmarkdown

---
title: "Untitled"
output: pdf_document
---

```{r setup, include=FALSE}

knitr::opts_chunk$set(echo =假)

## R Markdown

```{r}

摘要(汽车)

猫(“banaaaaaaa”)

猫(“banaaaaaaa”)

猫(“banaaaaaaa”)

```{r}

if(1 == 0){

print(“这将不会打印”)

}否则{

摘要(汽车)

猫(“banaaaaaaa”)

猫(“banaaaaaaa”)

猫(“banaaaaaaa”)

}

生成下面的pdf

​

​

如何让if中的第二个块中的代码产生与它上面的代码块相同的结果？

Answer 1

您缺少print命令。使用cat命令时，您需要手动指定新行(\n)命令。试试这个：

if(1 == 0){

    print("this will not print")

} else {
    print(summary(cars))
    cat("banaaaaaaa")
    cat('\n') # just copy paste this
    cat("banaaaaaaa")
    cat('\n')
    cat("banaaaaaaa")
}

     speed           dist       
 Min.   : 4.0   Min.   :  2.00  
 1st Qu.:12.0   1st Qu.: 26.00  
 Median :15.0   Median : 36.00  
 Mean   :15.4   Mean   : 42.98  
 3rd Qu.:19.0   3rd Qu.: 56.00  
 Max.   :25.0   Max.   :120.00  
banaaaaaaa 
banaaaaaaa 
banaaaaaaa