搜索精确匹配的 R 数据表格

Question

我的问题是关于datatable包中的全局搜索栏。

我正在尝试将此全局搜索栏设置为查找确切匹配项。这里有一些基于java查询的说明:

search exact match and highlight jquery datatable regex

然而，我需要知道如何在Rstudio中执行相同的操作。我认为我必须使用JS()函数，但是，我不确定该怎么做。

我想到了“smart=FALSE”的解决方案，但对我无用。

此外，由于我们公司的服务器上没有它，因此我无法使用闪亮的应用程序。

这是一个虚拟例子：

library(DT)
f=data.frame(c(10,12,35),c('aa','ab','cc'))
colnames(f)<- c('Col1','Col2')
datatable(f)

如果您在全局搜索栏中键入“a”，您将得到2个观测结果，其中都包含“a”。然而，我希望没有观测结果，因为表格中没有完全匹配“a”的内容。

非常感谢任何帮助。

敬礼，

Adel

- Adel

Answer 1

这只在浏览器中有效，而不是在RStudio查看器中：

最初的回答：

js <- c(
  "function(settings){",
  "  var instance = settings.oInstance;",
  "  var table = instance.api();",
  "  var input = instance.parent().find('.dataTables_filter input');",
  "  input.off('keyup search input').on('keyup', function(){",
  "    var keyword = '\\\\b' + input.val() + '\\\\b';",
  "    table.search(keyword, true, false).draw();",
  "  });",
  "}"
)

datatable(iris[c(1,2,51,52,101,102),], 
          options = list(initComplete = JS(js))
)

- Stéphane Laurent