从源脚本中删除消息答案

【问题标题】：remove messages from sourced script从源脚本中删除消息
【发布时间】：2015-10-06 19:48:02
【问题描述】：

我正在尝试获取一个使用 raster::extract(raster,spatialpolygons) 的脚本，以便它打印有关它用于提取哪个多边形的消息。文件的最终输出是我想要显示的 ggplot，但我不希望显示来自 R 的任何消息。

```{r percent of avg, echo=FALSE,message=FALSE,warning=FALSE,fig.width=15}
source('src/analysis/extract_huc4_elev.R') 
```

似乎没有任何块选项 echo、message 或 warning 会抑制此输出。如果我使用include=F，则情节不会显示。

编辑：我有一个打印声明，以便解释其中的一些内容：-/ 一些额外的调查发现它实际上是这一行：

> huc4=readOGR('data/gis','UpperCRB')

## OGR data source with driver: ESRI Shapefile 
## Source: "data/gis", layer: "UpperCRB"
## with 8 features
## It has 9 fields

您可以使用以下命令隐藏脚本中的消息：

> huc4=readOGR('data/gis','UpperCRB',verbose=F)

我仍然希望有一种方法可以在降价输出中隐藏所有脚本消息，例如在这种情况下，我正在采购一个 R 文件，因为我认为它更易于维护（这是我的第一个可重现的报告）——这意味着我仍然希望看到这些消息（打印语句、详细输出等）。处理脚本本身。

另外，这里是sessionInfo()，以防万一：

## R version 3.2.2 (2015-08-14)
## Platform: x86_64-apple-darwin13.4.0 (64-bit)
## Running under: OS X 10.9.5 (Mavericks)
## 
## locale:
## [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
## 
## attached base packages:
## [1] parallel  stats     graphics  grDevices utils     datasets  methods  
## [8] base     
## 
## other attached packages:
##  [1] ncdf4_1.13      gstat_1.0-26    doMC_1.3.3      iterators_1.0.7
##  [5] foreach_1.4.2   ipred_0.9-5     MASS_7.3-44     rgdal_1.0-7    
##  [9] readr_0.1.1     dplyr_0.4.3     plyr_1.8.3      tidyr_0.3.1    
## [13] raster_2.4-20   sp_1.2-0        ggplot2_1.0.1  
## 
## loaded via a namespace (and not attached):
##  [1] Rcpp_0.12.1      formatR_1.2.1    xts_0.9-7        class_7.3-13    
##  [5] tools_3.2.2      rpart_4.1-10     digest_0.6.8     evaluate_0.8    
##  [9] gtable_0.1.2     lattice_0.20-33  DBI_0.3.1        yaml_2.1.13     
## [13] prodlim_1.5.5    proto_0.3-10     stringr_1.0.0    knitr_1.11      
## [17] grid_3.2.2       nnet_7.3-11      spacetime_1.1-4  R6_2.1.1        
## [21] survival_2.38-3  rmarkdown_0.8    lava_1.4.1       reshape2_1.4.1  
## [25] magrittr_1.5     intervals_0.15.1 codetools_0.2-14 scales_0.3.0    
## [29] htmltools_0.2.6  splines_3.2.2    assertthat_0.1   colorspace_1.2-6
## [33] stringi_0.5-5    lazyeval_0.1.10  munsell_0.4.2    FNN_1.1         
## [37] zoo_1.7-12

【问题讨论】：

消息是什么？我没有得到任何东西。你能提供一个可重现的例子吗？你用的是什么版本的raster？
@RobertH 感谢您为我指明了正确的方向 - 我认为我的问题仍然处于稍微不同的上下文中（请参阅斜体编辑）
有一些通用的方法可以抑制消息，而您正在使用这些方法。不幸的是，readOGR 使用cat，这是一个坏主意（yihui.name/knitr/demo/output），但至少你可以用verbose=FALSE 将其关闭，所以它还不错......

标签： r knitr r-markdown

【解决方案1】：

根据@RobertH 评论http://yihui.name/knitr/demo/output 的链接，我测试并发现您可以使用results='hide',fig.keep='high',fig.show='asis' 并且文本输出，例如 print() 和 cat() 语句不会打印在 html 中，但图表还是通过了！

【讨论】：

【解决方案2】：

在搞砸了一些之后，我意识到另一种方法是使用 include=F 并在 R 脚本中将绘图保存到磁盘，然后在 r 块之外使用 ![Figure](/path/to/fig.png)

【讨论】：