shiny - 如何在闪亮的rhandsontable中使列标题字母加粗

Question

如何在r的闪亮包中使rhandsontable中的列标题粗体文本？

我有一个闪亮的 rhandsontable，我想让标题中的文本加粗。我该怎么做？有人知道吗？

Answer 1

您可以style像这样将一些添加到您的表中：

library(shiny)
library(rhandsontable)

ui <- fluidPage(
  rHandsontableOutput("table1"),
  tags$style(type="text/css", "#table1 th {font-weight:bold;}")
)

server=function(input, output, session) {

  output$table1 <- renderRHandsontable({
    rhandsontable(mtcars,rowHeaders=F)
  })
}

shinyApp(ui,server)

Answer 2

rhandsontable 是 Handsontable.js 库的接口，因此可以使用 CSS 对其进行自定义。取以下数据框：

DF = data.frame(column.one = 1:10,
                column.two = TRUE)

rhandsontable(DF)

它看起来像这样，没有任何定制。

但是如果你指定使用 CSS，你可以引用它：

DF = data.frame(column.one = 1:10,
                column.two = TRUE)

func = "function (col) {  # custom CSS
  switch (col) {
    case 0:
      return '<b>Bold</b> and <em>Italics</em>';

    case 1:
      return '<em>Bold</em> and <b>Italics</b>';
   }
 }"

 rhandsontable(DF, colHeaders = htmlwidgets::JS(func))

你最终得到了这个。

确保在调用 rhandsontable 函数时指定 colHeaders 参数。