css - Shiny - 更改文本（框）的大小、颜色和字体

Question

这一定是一个简单的问题，但我还没有找到任何关于更改 shinyDashboard 框中文本的大小、字体和颜色的脚本或建议。例如，我想让这个框显示 14px Arial 灰色文本：

  box(width = 4, title = "sample", "this is a test")

我想这需要css，但是有什么方法可以使用Shiny的内置函数来实现这一点？

非常感谢。

Answer 1

您需要更改框的 CSS 才能使其正常工作。您可以直接在 ui 中传递 CSS，使用tableHTML::make_css. 函数box创建一个名为“box”的 HTML 类，您可以使用它来更改框的 CSS：

library(shiny)
library(tableHTML)

ui <- fluidPage(
 tags$style(make_css(list('.box', 
                          c('font-size', 'font-family', 'color'), 
                          c('14px', 'arial', 'red')))),
 box(width = 4, title = "sample", "this is a test")
)

server <- function(input, output) {}

shinyApp(ui = ui, server = server)

输出：

我将文本设置为红色，以便您可以轻松区分黑色。您可以将其替换为灰色或您想要的任何颜色。