completely suppress Rplots.pdf

sometimes the chunk options may also produce plots, hence Rplots.pdf is generated (see https://gist.github.com/2790922)
yihui · May 26, 2012 · 99f5888 · 99f5888
1 parent dcf921c
commit 99f5888
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/output.R b/R/output.R
@@ -157,7 +157,8 @@ knit = function(input, output = NULL, tangle = FALSE, text = NULL) {
 
   on.exit(chunk_counter(reset = TRUE), add = TRUE) # restore counter
   ## turn off fancy quotes, use smaller digits/width, warn immediately
-  oopts = options(useFancyQuotes = FALSE, digits = 4L, width = 75L, warn = 1L)
+  oopts = options(useFancyQuotes = FALSE, digits = 4L, width = 75L, warn = 1L,
+                  device = function(file = NULL, ...) pdf(file, ...))
   on.exit(options(oopts), add = TRUE)
 
   progress = opts_knit$get('progress')