inst/explorer/server/5_event_document_visualisation_click.R

shiny::observeEvent(input$dok_vis_click, {
    # Cursor position
    musepos_dok_vis <- input$dok_vis_click
    rute_nr <- ceiling(musepos_dok_vis$x - 0.5)
    shinyjs::runjs(sprintf(
        "$('.boxed_doc_%s').scrollTo('#%s', duration = 200);",
        plot_mode$mode,
        rute_nr
    ))
})

Try the corporaexplorer package in your browser

Any scripts or data that you put into this service are public.

corporaexplorer documentation built on Sept. 11, 2024, 7:21 p.m.