rstudio - DT 包列过滤器在 RMarkdown HTML 中不起作用

Question

我正在使用 RMarkdown 和 DT 包在 HTML 报告中创建动态表格。我正在尝试通过添加 [filter = 'top'] 来添加列过滤器，如 DT 包文档中所述，以便用户可以单独搜索每一列。但是，当我编织成 HTML 时，列级过滤器就在那里，但它们不起作用。我使用的是最新版本的 R Studio 和 0.4 版的 DT 包。我做错了什么？

 ---
 title: <b>Report</b>
 date: Updated `r format(Sys.time(), '%B %d, %Y')`
 output:
 rmarkdown::html_document:
 theme: cosmo
---

 ```{r setup, include=FALSE}
 knitr::opts_chunk$set(echo = TRUE)
 library(rmarkdown)
 library(DT)
 library(htmltools)
 library(knitr)
 ```

 ###Tab 1: Alphabetic List of Fields

```{r by.field, echo=FALSE,results="asis",warning=FALSE}

#Making the table
fieldname=binned_data$Attribute.from.EHR.database
field_def=binned_data$Definition
field_table=binned_data$Table
fieldtable=data.frame(fieldname, field_def, field_table)


print(htmltools::tagList(
datatable(
fieldtable, colnames=c(
  "Field","Definition", "Table"), 
    filter = 'top',
    options = list(autowidth = TRUE,
    order = list(list(0, 'asc')),
    columnDefs = list(list(className = 'dt-left', targets = c(0,1,2))),
      pageLength = 25, 
      lengthMenu = c(25, 50, 75, 100, 150),
      initComplete = JS("
        function(settings, json) {
        ","
        $('body').css({
        'font-family': 'Century Gothic', 'font-size': '150%'
        });
        $(this.api().table().header()).css({
        'font-family': 'Century Gothic',
        'font-size':'125%',
        'background-color': '#008000',
        'color': '#fff'
        });
        }
        ")
),rownames = FALSE
)))

```

这就是输出的样子，但是当我开始在列过滤器框中输入时，什么也没有发生。 Output

Answer 1

我非常 新 R，所以我不确定你问题的根源，但我最近遇到了同样的问题。在我使用 df$var <- currency(df$var, digits = 0L) 格式化我的数字列之后，我无法过滤我的 rmd html 输出中的任何数据表列。 (并且格式也没有出现在数据表中...... womp。)

我摆脱了货币格式，然后过滤器就可以正常工作了。

所以可能是您的变量值的某些格式导致过滤器失败。 (虽然不能格式化值和过滤似乎很糟糕，但我还是新手，可能做错了......)我希望我能帮助你确定可能 格式化的罪魁祸首...但也许这将是一个开始。

(另请查看 this link 中的红色框，其中列出了 DT 扩展和列过滤器的已知问题。)