addPanel（）导致markdown中的第二个图

Question

我正在使用R 3.4.3和最新的编织器来创建降价文档。我用普通的R脚本创建了一个带有移动平均线的时间序列图，如下所示：

plot(xts.qty_ordered.by_day, col = 'red', main = 'Qty Ordered by Day')
addPanel(rollmean, k=20, on=1, col = 'blue')

它给了我叠加移动平均线的时间序列。然而，当我把它放在Rmd文档中并编织它时，输出包含两个图：第一个是单独的时间序列，第二个是叠加了移动平均值的时间序列。如何让knitr R不要像这样加倍输出？

Answer 1

一种可能性是将第一个图包装在您的Rmd文档中的invisible内。

例如：

```{r}
library(xts);
data(sample_matrix)
sample.xts <- as.xts(sample_matrix)

invisible(plot(sample.xts[,"Close"]));
addPanel(rollmean, k = 20, on = 1, col = "blue");
```

针织产生：