我使用类似于下面的代码片段的代码生成了一组表:
```{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 文档的表格。
在 for 循环中没有“输出屏幕”,除非您使用print(x)
功能。
for (i in 1:4) { i }
不显示任何内容
for (i in 1:4) {print(i)}
显示数字 1 2 3 和 4
解决方案:在FOR循环中构造表(使用knitt)并将其分配给变量。然后使用打印出这个变量print()
功能。记住。您必须在 var 表前后添加空行:在内部使用粘贴功能print()
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)