addPanel() 导致降价中的第二个情节

Question

我正在使用 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 不会像这样将输出加倍？

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");
```

针织产品：

addPanel() 导致降价中的第二个情节

addPanel() causes second plot in markdown

plot

r

knitr