title: navigate to next tab post clicking on link
body: <p>Below is the application. I need to navigate to next tab when clicked on &quot;I clicked&quot; on DT table. But as per below code, that is not working. Can anyone help me........................................................................</p>
  <pre><code>library(shiny)
  library(shinydashboard)
  library(DT)
  
  # UI ---------------------------------------------------------------------
  
  ui &lt;- fluidPage(
    tabsetPanel(
      id = &quot;panels&quot;,
      tabPanel(
        &quot;A&quot;,
        p(),
        DTOutput(&quot;tab&quot;)
        # actionLink(&quot;link_to_tabpanel_b&quot;, &quot;Link to panel B&quot;)
        # HTML('&lt;a id=&quot;Iclickehase&quot; class=&quot;action-button&quot; href=&quot;#&quot;&gt;I clicked&lt;/a&gt;')
      ),
      tabPanel(
        &quot;B&quot;,
        h3(&quot;Some information&quot;),
        tags$li(&quot;Item 1&quot;),
        tags$li(&quot;Item 2&quot;),
        actionLink(&quot;link_to_tabpanel_a&quot;, &quot;Link to panel A&quot;)
      )
    )
  )
  
  # Server ------------------------------------------------------------------
  
  server &lt;- function(input, output, session) {
    #   observeEvent(input$link_to_tabpanel_b, {
    #     tags$a(href = &quot;#tab-4527-2&quot;)
    #   })
    
    df &lt;- data.frame(a = c(1))
    df$b &lt;- HTML('&lt;a id=&quot;Iclickehase&quot; class=&quot;action-button&quot; href=&quot;#&quot;&gt;I clicked&lt;/a&gt;')
    # 
    output$tab &lt;- renderDataTable({
      datatable(df,escape = F,selection = 'none')
    })
    
    observeEvent(input$Iclickehase, {
      newvalue &lt;- &quot;B&quot;
      updateTabItems(session, &quot;panels&quot;, newvalue)
    })
    observeEvent(input$link_to_tabpanel_a, {
      newvalue &lt;- &quot;A&quot;
      updateTabsetPanel(session, &quot;panels&quot;, newvalue)
    })
  }
  
  shinyApp(ui, server)
  </code></pre>