title: How to disable double click reactivity for specific columns in R Datatable
body: <p>I am working on a DT in my Shiny app which contains Shiny Input objects and some editable columns.</p>
  
  <p>Here is a reproducible example,</p>
  
  <pre><code>
  library(shiny)
  library(DT)
  
  ui &lt;- fluidPage(
    fluidRow(
    DTOutput('table1')
  
    )
  )
  
  helper_fun &lt;- function(FUN, len, id, ...) {
    inputs = character(len)
    for (i in seq_len(len)) {
      inputs[i] = as.character(FUN(paste0(id, i), selected = 1, ...))
    }
    inputs
  }
  
  server &lt;- function(input, output, session) {
    output$table1 &lt;- renderDT({
      dat &lt;- data.frame(Name = c('A', 'B')
                        , column1 = helper_fun(FUN = selectInput, len = length(2), id = 'selector_', label = NULL, choices = c(1, 2),  width="100px") 
                        )
      dat
    }, editable = list(target = 'cell', disable = list(columns = c(2))), server = FALSE, escape = FALSE
    , options = list(preDrawCallback = JS('function() { Shiny.unbindAll(this.api().table().node()); }'), 
                     drawCallback = JS('function() { Shiny.bindAll(this.api().table().node()); } ')))
  }
  
  shinyApp(ui, server)
  </code></pre>
  
  <p>I would like to be able to edit 1 of the columns and disable editing on the columns with shiny Input values. Using <code>editable = list(target = 'cell', disable = list(column = c(2)))</code> does not have the desired effect as this disables editing but exposes the underlying <code>html</code> when the cell is double clicked. </p>
  
  <p>How can I disable this double click effect on certain columns? </p>