r-markdown - 从 R Markdown 和 Knitr 中删除 R 输出中的散列

Question

我正在使用 RStudio 编写我的 R Markdown 文件。如何删除##代码输出之前显示的最终 HTML 输出文件中的哈希 ( )？

举个例子：

---
output: html_document
---

```{r}
head(cars)
```

Answer 1

您可以在您的块选项中包括类似

comment=NA # to remove all hashes

或者

comment='%' # to use a different character

更多关于 knitr 的帮助可以从这里获得：http: //yihui.name/knitr/options

如果您使用的是 R Markdown，那么您的块可能如下所示：

```{r comment=NA}
summary(cars)
```

如果要全局更改，可以在文档中包含一个块：

```{r include=FALSE}
knitr::opts_chunk$set(comment = NA)
```

Answer 2

只是 HTML

如果您的输出只是 HTML，您可以充分利用 PRE 或 CODE HTML 标签。

例子

```{r my_pre_example,echo=FALSE,include=TRUE,results='asis'}
knitr::opts_chunk$set(comment = NA)
cat('<pre>')
print(t.test(mtcars$mpg,mtcars$wt))
cat('</pre>')
```

HTML 结果：

    韦尔奇二样本 t 检验


数据：mtcars$mpg 和 mtcars$wt
   t = 15.633，df = 32.633，p 值 < 0.00000000000000022
   备择假设：均值的真实差异不等于 0
   95% 置信区间：
    14.67644 19.07031
   样本估计：
   x 的平均值 y 的平均值
    20.09062 3.21725
   

只是PDF

如果您的输出是 PDF，那么您可能需要一些替换功能。这是我正在使用的：

```r
tidyPrint <- function(data) {
    content <- paste0(data,collapse = "\n\n")
    content <- str_replace_all(content,"\\t","    ")
    content <- str_replace_all(content,"\\ ","\\\\ ")
    content <- str_replace_all(content,"\\$","\\\\$")
    content <- str_replace_all(content,"\\*","\\\\*")
    content <- str_replace_all(content,":",": ")
    return(content)
  }
```

例子

代码也需要有点不同：

```{r my_pre_example,echo=FALSE,include=TRUE,results='asis'}
knitr::opts_chunk$set(comment = NA)
resultTTest <- capture.output(t.test(mtcars$mpg,mtcars$wt))
cat(tidyPrint(resultTTest))
```

PDF 结果

PDF 和 HTML

如果您确实需要在 PDF 和 HTML 两种情况下都使用页面，则 tidyPrint 在最后一步中应该会有所不同。

```r
tidyPrint <- function(data) {
    content <- paste0(data,collapse = "\n\n")
    content <- str_replace_all(content,"\\t","    ")
    content <- str_replace_all(content,"\\ ","\\\\ ")
    content <- str_replace_all(content,"\\$","\\\\$")
    content <- str_replace_all(content,"\\*","\\\\*")
    content <- str_replace_all(content,":",": ")
    return(paste("<code>",content,"</code>\n"))
  }
```

结果

PDF 的结果是一样的，HTML 的结果和之前的比较接近，但是多了一些边框。

它并不完美，但也许已经足够好了。