R reactable - применение нескольких стилей в colDef

Question

Столбцы в reactable (реагирующий пакет R) могут быть стилизованы со списком стилей, функцией или 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
    )
  )
)

Ошибка:

Error in colDef(style = c(list_style, js_style, fn_style)) : 
  `style` must be a named list, character string, JS function, or R function