R可反应-在colDef中应用多个样式

R可反应-在colDef中应用多个样式,r,shiny,reactable,R,Shiny,Reactable,reactable(R package reactable)中的列可以使用样式列表、函数或javascript进行样式设置——如果我只想使用一种方式,这种方式就可以工作。如何将它们结合起来(不重写列表、函数或javascript代码) 例如: library(reactable) list_style <- list(background = "#eee") js_style <- JS(" function(rowInfo) {

reactable(R package reactable)中的列可以使用样式列表、函数或javascript进行样式设置——如果我只想使用一种方式,这种方式就可以工作。如何将它们结合起来(不重写列表、函数或javascript代码)

例如:

library(reactable)

list_style <- list(background = "#eee")

js_style <- JS("
    function(rowInfo) {
      return {fontWeight: 'bold' }
    }
  ")

fn_style <- function(value) {
    color <- "#008000"
    list(color = color)
}

df <- data.frame(x = 1:10, y = 11:20)

reactable(
  df,
  columns = list(
    x = colDef(
      style = c(list_style, js_style, fn_style) # This generates the below error
    )
  )
)

由于这是一个特定于包的问题,对于github站点来说,这个包可能是一个更好的问题:。它似乎不接受多种类型,所以您实际上是在请求功能。因为它可以接受一个函数,您可以编写自己的函数来组合不同的样式,但是组合JS和非JS代码可能会比较棘手。因为对于github站点来说,对于该包来说,这可能是一个更好的问题:。它似乎不接受多种类型,因此您实际上是在提出功能请求。由于它可以接受函数,您可以编写自己的函数来组合不同的样式,但组合JS和非JS代码可能会比较棘手。
Error in colDef(style = c(list_style, js_style, fn_style)) : 
  `style` must be a named list, character string, JS function, or R function