我无法弄清楚如何更改可折叠框的+/-按钮的颜色。我想将白色按钮更改为黑色。下面是示例代码:
library(shiny)
library(shinydashboard)
body <- dashboardBody(
fluidRow(
box(status = "info", solidHeader = TRUE, title = "Background - Hypothetical Life", width = "auto", collapsible = TRUE, collapsed = TRUE,
h5("sample text"))))
ui <- dashboardPage(
dashboardHeader(title = "Box"),
dashboardSidebar(),
body
)
server = function(input, output, session) { }
shinyApp(ui = ui, server = server)
非常感谢!
使用CSS的方法如下:
library(shiny)
library(shinydashboard)
body <- dashboardBody(
tags$style(
type = 'text/css',
'.fa, .fas {
font-weight: 900;
color: black;
}'
),
fluidRow(
box(status = "info", solidHeader = TRUE,
title = "Background - Hypothetical Life",
width = "auto", collapsible = TRUE, collapsed = TRUE,
h5("sample text"))))
ui <- dashboardPage(
dashboardHeader(title = "Box"),
dashboardSidebar(),
body
)
server = function(input, output, session) { }
shinyApp(ui = ui, server = server)
就像在这个答案中说的那样,当您想更改CSS样式但不真正了解CSS时(像我一样),请在浏览器中启动应用程序,执行“检查元素”(右键单击或按Ctrl + Shift + C ),然后检查“检查器”。它将显示每个元素的CSS描述。
然后,tags$style
像上面的示例一样,将此CSS代码放入其中,并添加一些自定义参数。CSS上有很多在线资源。
例如,在上面的示例中,我在“检查器”中看到了图标CSS样式是:
.fa, .fas {
font-weight: 900;
}
因此,我只将其放在中tags$style
,然后搜索修改图标颜色所需的参数。对另一篇文章的回答为我提供了解决方案:您需要添加color
。
希望这可以帮助
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句