add default for the idx argument in merge_low_plot()

yihui · Jul 1, 2012 · 64ead76 · 64ead76
1 parent 635d02a
commit 64ead76
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/plot.R b/R/plot.R
@@ -139,7 +139,7 @@ rm_blank_plot = function(res) {
 }
 
 ## merge low-level plotting changes
-merge_low_plot = function(x, idx) {
+merge_low_plot = function(x, idx = sapply(x, is.recordedplot)) {
   idx = which(idx); n = length(idx); m = NULL # store indices that will be removed
   for (i in 1:(n - 1)) {
     p1 = x[[idx[i]]]; p2 = x[[idx[i + 1]]]