addPanel() 导致降价中的第二个图答案

【问题标题】：addPanel() causes second plot in markdownaddPanel() 导致降价中的第二个图
【发布时间】：2018-07-09 23:40:53
【问题描述】：

我正在使用 R 3.4.3 和最新的 knitr 创建降价文档。我在普通的 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 不会像这样将输出加倍？

【问题讨论】：

标签： r plot knitr

【解决方案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");
```

针织产品：

【讨论】：