使用 DT::datatable，如何自动“单击”页面按钮

【问题标题】：Using DT::datatable, how to 'click' the page button automatically使用 DT::datatable，如何自动“单击”页面按钮
【发布时间】：2021-09-28 10:21:46
【问题描述】：

使用 DT::datatable 可以创建底部带有“页面选择按钮”的 html 表格。

有什么方法可以自动点击按钮？（我想自动逐页显示数据）

data(iris)
md <- iris
DT::datatable(md)

【问题讨论】：

标签： r dt

【解决方案1】：

这是你想要的吗？

library(DT)

js <- c(
  "var npages = table.page.info().pages;",
  "var i = 0;",
  "var myinterval = setInterval(function(){",
  "  if(i < npages - 1){",
  "    i = i+1;",
  "    table.page(i).draw('page');",
  "  }else{",
  "    clearInterval(myinterval)",
  "  }",
  "}, 1000);"
)

datatable(
  iris,
  callback = JS(js)
)

【讨论】：