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 的查看器中呈现，但不能在 .Rmd 中包含拆分表。我错过了什么？