Блестящие Datatables - фокус после загрузки страницы

Question

Итак, я пытаюсь сделать так, чтобы данные в моем блестящем приложении прокручивались вверх и фокусировались на элементе после того, как кто-то нажимает на следующую страницу. Следующий код работает, но проблема заключается в том, что фокус работает каждый раз, когда его обращается (из drawCallBack)

options=list(pageLength=50, drawCallBack = DT::JS(
     'function (paginateScroll) { 
     $("html, body").animate({ 
      scrollTop: 0 
     }, 300); 
     $("th:first-child").focus(); 
     $(".paginate_button").bind("click", paginateScroll); 
     }' 
    )) 

Я знаю, что есть мероприятие под названием страница (https://datatables.net/reference/event/page), который должен работать, но я не могу показаться, получите код в порядке. Может кто-нибудь мне помочь?

Answer 1

Я не совсем понимаю, какова ваша цель, но я вижу, что вы хотите запускать JS только при изменении страницы, а не при ее рисовании. Вот несколько JS, которые запускаются только при изменении страницы. Надеюсь, что это помогает:

library(shiny) 
library(DT) 

shinyApp( 
    ui = fluidPage(
    mainPanel(DT::dataTableOutput("test") 
    ) 
), 
    server = function(input, output,session) {  
    output$test <- DT::renderDataTable({ 
     mtcars 

    }, 
    callback=DT::JS(
     'table.on("page.dt",function() { 
     alert("Page has changed"); 
     }) 
     ' 
    ) 
    ) 
    } 
)