Rmarkdown打印data.frame里面的功能

Question

我使用 iris data.frame 简化了我的问题。问题是我无法在 Rmd 文件中的函数内打印 data.frame。

这是我的“test.Rmd”文件：

```{r results='asis',echo=FALSE}  
fun_test<-function(dfiris){
  out<-tryCatch(
    { 
      cat("  \n### Inside fun_test. Printing dfiris -> FAIL  \n")
      cat("  \n")
      kable(dfiris) # It does not work
    },
    error=function(cond){return(NA) }    
  )
}
```

```{r results='asis',echo=FALSE}  
library(knitr)
df1<-head(iris)
cat("  \n## Start. Outisde fun_test. Printing df1 -> OK  \n")
cat("  \n")
kable(df1)
fun_test(df1)
```

所以，我把它渲染成 Word 文档：

render("test.Rmd","word_document")

输出是：

为什么不打印 data.frame “dfiris”？我的“fun_test”函数有问题吗？

Answer 1

您没有返回结果，只是将其分配给out。

试试：

fun_test<-function(dfiris){
  tryCatch(
    { 
      cat("  \n### Inside fun_test. Printing dfiris -> FAIL  \n")
      cat("  \n")
      kable(dfiris) # It does not work
    },
    error=function(cond){return(NA) }    
  )
}