R + knitr + PerformanceAnalytics ошибки построения

Question

Я запускаю следующий фрагмент кода, но по какой-то причине при использовании charts.PerformanceSummary() внутри for Цикл пытается сделать больше выходов, чем количество раз, которое он проходит через цикл. Принимая во внимание, что простая функция заговора, кажется, работает хорошо...

Пожалуйста, смотрите код.Rmd ниже, а затем последующий файл.md, созданный после вяжущего в html...

PLOT TEST
====

```{r}
suppressPackageStartupMessages(require(PerformanceAnalytics))
for(i in 1:5){
  charts.PerformanceSummary(xts(rnorm(i*1000,0.0001,0.0003),Sys.Date()-c((i*1000):1)))
}
```

```{r}
for(i in 1:5){
  plot(xts(cumprod(rnorm(i*1000,0.0001,0.0003)+1),Sys.Date()-c((i*1000):1)))
}
```

Предоставление следующего файла.md

PLOT TEST
====


```r
suppressPackageStartupMessages(require(PerformanceAnalytics))
for (i in 1:5) {
    charts.PerformanceSummary(xts(rnorm(i * 1000, 1e-04, 3e-04), Sys.Date() - 
   c((i * 1000):1)))
}
```

![plot of chunk unnamed-chunk-1](figure/unnamed-chunk-11.png) ![plot of chunk unnamed-chunk-1](figure/unnamed-chunk-12.png) ![plot of chunk unnamed-chunk-1](figure/unnamed-chunk-13.png) ![plot of chunk unnamed-chunk-1](figure/unnamed-chunk-14.png) ![plot of chunk unnamed-chunk-1](figure/unnamed-chunk-15.png) ![plot of chunk unnamed-chunk-1](figure/unnamed-chunk-16.png) 



```r
for (i in 1:5) {
    plot(xts(cumprod(rnorm(i * 1000, 1e-04, 3e-04) + 1), Sys.Date() - c((i * 
    1000):1)))
}
```

![plot of chunk unnamed-chunk-2](figure/unnamed-chunk-21.png) ![plot of chunk unnamed-chunk-2](figure/unnamed-chunk-22.png) ![plot of chunk unnamed-chunk-2](figure/unnamed-chunk-23.png) ![plot of chunk unnamed-chunk-2](figure/unnamed-chunk-24.png) ![plot of chunk unnamed-chunk-2](figure/unnamed-chunk-25.png) 

Обратите внимание на то, что есть 6 выходных графиков, к которым пытается подключиться блок frist, но во втором блоке есть только 5 выходных графиков, несмотря на то, что оба имеют одинаковые for (i in 1:5) { немного кода...

В качестве дополнительной информации ниже был sessionInfo

sessionInfo() 
## R version 3.0.0 (2013-04-03)
## Platform: x86_64-apple-darwin10.8.0 (64-bit)
## 
## locale:
## [1] en_GB.UTF-8/en_GB.UTF-8/en_GB.UTF-8/C/en_GB.UTF-8/en_GB.UTF-8
## 
## attached base packages:
## [1] stats     graphics  grDevices utils     datasets  methods   base     
## 
## other attached packages:
## [1] PerformanceAnalytics_1.1.0 xts_0.9-3                 
## [3] zoo_1.7-9                  knitr_1.2                 
## 
## loaded via a namespace (and not attached):
## [1] digest_0.6.3    evaluate_0.4.3  formatR_0.7     grid_3.0.0     
## [5] lattice_0.20-15 stringr_0.6.2   tools_3.0.0

РЕДАКТИРОВАТЬ

Я также только что запустил одну строку самостоятельно и получил пол-исправления... но не один для создания нескольких диаграмм в одном чанке...

Ниже приведен скрипт.Rmd вместе с выводом.md

```{r}
charts.PerformanceSummary(xts(rnorm(1000,0.0001,0.0003),Sys.Date()-c((1000):1)))
```

```{r fig.keep='last'}
charts.PerformanceSummary(xts(rnorm(1000,0.0001,0.0003),Sys.Date()-c((1000):1)))
```

выход.md

```r
charts.PerformanceSummary(xts(rnorm(1000, 1e-04, 3e-04), Sys.Date() - c((1000):1)))
```

![plot of chunk unnamed-chunk-4](figure/unnamed-chunk-41.png) ![plot of chunk unnamed-chunk-4](figure/unnamed-chunk-42.png) 



```r
charts.PerformanceSummary(xts(rnorm(1000, 1e-04, 3e-04), Sys.Date() - c((1000):1)))
```

![plot of chunk unnamed-chunk-5](figure/unnamed-chunk-5.png) 

РЕДАКТИРОВАТЬ 2

Как отмечает @agstudy, похоже, что knitr создает ненужное пустое изображение... кто-нибудь знает, как его удалить?