从knitr输出中删除进度条

2023年12月12日 209次阅读

我正在分析一些数据,并希望在R上做一个Simpsons悖论.我已经安装了Simpsons包并加载了库.以下是基于包文档的示例：

---
output: html_document
---
```{r}
library(Simpsons)
#generating data 
Coffee1=rnorm(100,100,15)
Neuroticism1=(Coffee1*.8)+rnorm(100,15,8)
g1=cbind(Coffee1, Neuroticism1)
Coffee2=rnorm(100,170,15)
Neuroticism2=(300-(Coffee2*.8)+rnorm(100,15,8))
g2=cbind(Coffee2, Neuroticism2)
Coffee3=rnorm(100,140,15)
Neuroticism3=(200-(Coffee3*.8)+rnorm(100,15,8))
g3=cbind(Coffee3, Neuroticism3)
data2=data.frame(rbind(g1,g2,g3))
colnames(data2) <- c("Coffee","Neuroticism")

example <- Simpsons(Coffee,Neuroticism,data=data2) 
plot(example)
```

这将返回一个包含3个聚类的图(正是我需要的).但是,当我将Rmd文件编织为HTML时,我会得到很多等号(======),旁边有一个百分比,就像一个加载网格,我想从最终输出中删除.

《从knitr输出中删除进度条》

最佳答案 您可以通过设置knitr chunk选项来抑制R中的任何输出消息.如果我们希望隐藏除绘图之外的所有代码输出,我们可以使用
following solution：

---
output: html_document
---

```{r echo=FALSE, results='hide', fig.keep='all', message = FALSE}
library(Simpsons)
#generating data 
Coffee1=rnorm(100,100,15)
Neuroticism1=(Coffee1*.8)+rnorm(100,15,8)
g1=cbind(Coffee1, Neuroticism1)
Coffee2=rnorm(100,170,15)
Neuroticism2=(300-(Coffee2*.8)+rnorm(100,15,8))
g2=cbind(Coffee2, Neuroticism2)
Coffee3=rnorm(100,140,15)
Neuroticism3=(200-(Coffee3*.8)+rnorm(100,15,8))
g3=cbind(Coffee3, Neuroticism3)
data2=data.frame(rbind(g1,g2,g3))
colnames(data2) <- c("Coffee","Neuroticism")

example <- Simpsons(Coffee,Neuroticism,data=data2) 
plot(example)
```

我会注意到这个软件包似乎打印出大多数软件包的内容,因此选项的组合很长.

一种更简单的方法可能是将绘图移动到一个单独的块并让所有分析在它之前运行. include参数可用于抑制所有输出,但这包括绘图,因此我们必须使用两个块：

```{r, include = FALSE}
# your code to build model
```

```{r}
plot(example)
```

Check out the full list of knitr chunk 07001

点赞