这一定是一个简单的问题,但我还没有设法找到有关在shinyDashboard框中更改文本大小,字体和颜色的任何脚本或建议。比如说,我想让这个框显示14px Arial灰色文字:
box(width = 4, title = "sample", "this is a test")
我认为这需要css,但有什么方法可以使用Shiny的内置函数来实现这个目标吗?
非常感谢。
答案 0 :(得分:3)
您需要更改框的CSS才能生效。您可以使用tableHTML::make_css
直接在ui中传递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)
输出:
我将文字设为红色,这样你就可以轻松地区分黑色。您可以用灰色或任何颜色替换它。