在 R Shiny 數據表中，單擊后嘗試展開單元格。 我怎樣才能做到這一點？

Question

我想在單擊時展開 R Shiny 中的數據表中的單元格。 我遇到了以下實現，用戶可以通過一個單元格 hover 來查看它的全部內容：

DT::datatable(
        bgcDF,
        class = "display nowrap",
        rownames = FALSE,
        escape = FALSE,
        options = list(
          columnDefs = list(list(
            targets = c(4),
            render = JS(
              "function(data, type, row, meta) {",
              "return type === 'display' && data.length > 60 ?",
              "'<span title=\"' + data + '\">' + data.substr(0, 60) + '...</span>' : data;",
              "}")
          )),

這是我需要的前半部分。 如果單元格中的數據符合此標准並且已被縮短，我如何實現單擊功能來擴展該單元格中的數據？

謝謝

Answer 1

也許通過請求可編輯單元格但禁用所有列的編輯：

library(DT)

dat <- iris

datatable(
  dat,
  editable = list(
    target = "cell", 
    disable = list(columns = seq_along(dat))
  )
)

然后雙擊單元格時出現單元格內容。