r - Rmarkdown と DT: 結果がレンダリングされない

Question

これをRmarkdownでレンダリングする方法を知っていますか?

```{r, results='asis'}

library(DT)

obj <- data.frame(B=as.numeric(1:18), 
                  C=as.factor(c("A","B","C")), 
                  stringsAsFactors=FALSE)

obj <- split(obj, obj$C, drop = TRUE)

lapply(obj, function(x) {
   datatable(x,
             filter = 'top', options = list(
             pageLength = 12, autoWidth = TRUE))
                          }
      )

```

DT テーブルは RStudio の Viewer でレンダリングされますが、分割されたテーブルを .Rmd. に含めることはできません。何が欠けていますか?