搜索完全匹配R数据表

Question

我的问题在于数据包包中的全局搜索栏。

我试图设置此全局搜索栏以找到完全匹配。这里有一些基于 java查询的指令：

search exact match and highlight jquery datatable regex

但是，我需要知道如何在 Rstudio 中执行相同的操作。我想我必须使用JS（）函数，但是，我不知道该怎么做。

我想出了＆＃34; smart = FALSE＆＃34;解决方案，但它对我没用。

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

以下是虚拟示例：

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

如果您输入＆＃39;在全局搜索栏中，您将获得2个观察结果，其中两个观察结果包含＆＃39; a＆＃39;。但是，我不想观察，因为没有完全匹配＆＃39; a＆＃39;在表中。

非常感谢任何帮助。

此致

阿德尔

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))
)