我正在嘗試為 Shiny 操作按鈕添加陰影，并更改其顏色。我想這需要一些CSS？有什么建議么？我避免添加像 shinyWidget 這樣的包；我不需要任何比改變顏色/陰影更漂亮的東西，而且我正在避免包裝膨脹。
我搜索了高低，所有推薦都流向了shinyWidget，或者問題/答案非常繁瑣。所以這是我的簡單例子。
帶有未格式化的基本操作按鈕的代碼：
library(shiny)
ui <- fluidPage(
br(),actionButton("add","Click to add 1 to the data!!!"), br(),br(),
fluidRow(tableOutput("data")),
)
server <- function(input, output, session) {
x = reactiveVal(0)
output$data <- renderTable(x())
observeEvent(input$add,{x(x() 1)})
}
shinyApp(ui, server)
uj5u.com熱心網友回復：
事實上，這需要 CSS。請參閱這篇文章以了解如何在閃亮的應用程式中包含 CSS。很難確切地知道你想要的風格，但也許這會有所幫助：
ui <- fluidPage(
tags$head(
tags$style(
HTML(
"#add {
color: red;
background-color: black;
box-shadow: 3px 3px 3px 3px grey;
}"
)
)
),
br(),actionButton("add","Click to add 1 to the data!!!"), br(),br(),
fluidRow(tableOutput("data")),
)
要了解有關 CSS 的更多資訊，W3schools有很好的教程。
轉載請註明出處，本文鏈接：https://www.uj5u.com/ruanti/515815.html
標籤：r按钮闪亮的
下一篇：HowtotriggerRShinyobserveEventwhenonespecifiedchoiceamongvarioususerchoicesisselected?