Генерация таблиц пандеров в цикле в RMarkdown в Rstudio
У меня есть набор таблиц, которые я генерирую с использованием кода, подобного фрагменту ниже:
```{r tables, echo=TRUE, eval=TRUE}
require(reshape2); require(pander)
data("mtcars")
data("AirPassengers")
dta_lst <- list(mtcars, AirPassengers)
for (i in 1:length(dta_lst)) {
pander(melt(head(dta_lst[[i]], n = 2), varnames = c("Something"),
value.name = "Something else"),
caption = paste("Some table for: ", class(dta_lst[[i]])))
}
```
Когда я запускаю код, он выдает желаемый результат (естественно, приведенный пример не имеет особого смысла, в моих собственных данных я разумным образом растапливаю данные):
---------------------------
variable Something else
---------- ----------------
mpg 21
mpg 21
cyl 6
cyl 6
disp 160
disp 160
hp 110
hp 110
drat 3.9
drat 3.9
wt 2.62
wt 2.875
qsec 16.46
qsec 17.02
vs 0
vs 0
am 1
am 1
gear 4
gear 4
carb 4
carb , 4
---------------------------
Table: Some table for: data.frame
----------------
Something else
----------------
112
118
----------------
Table: Some table for: ts
Когда я пытаюсь связать код в Rstudio, таблицы pander не отображаются:
Естественно, без циклаpander
Команда отлично работает и генерирует таблицы, которые аккуратно связаны в документ HTML.