搜索精确匹配 R 数据表

我的问题是数据表包中的全局搜索栏。

我正在尝试设置此全局搜索栏以查找完全匹配。有一些java查询基于此处的说明：

搜索完全匹配并突出显示 jquery 数据表正则表达式 https://stackoverflow.com/questions/29783136/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”没有完全匹配。

非常感谢任何帮助。

Regards,

Adel

这仅适用于浏览器，不适用于 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))
)