Convert 'dataui' to 'reactable' Custom Render Function

Convert 'dataui' to 'reactable' Custom Render Function

dui_for_reactable(dui, jsarg = "cellInfo")

Arguments

dui	dataui htmlwidget to convert

Value

htmlwidgets::JS of class JS_EVAL

Examples

if(requireNamespace("reactable")) {
  # create data frame with a list column
  df <- data.frame(x=1)
  df$x[1] <- list(1:10)
  dui_add_reactable_dep(
    reactable::reactable(
      df,
      columns = list(
        x = reactable::colDef(
          cell = dui_for_reactable(dui_sparkline(
            data = htmlwidgets::JS("cellInfo.value"),
            components=list( dui_sparklineseries() )
          )
        ))
      )
    )
  )
}
#> 
#> For this to work, please add the dataui dependency to your reactable instance.
#> dui_add_reactable_dep(...reactable widget...)
#>