https://getbootstrap.com/css/#buttons
https://v4-alpha.getbootstrap.com/components/buttons/#examples
允许有主要,次要等。
要是也能在这里就好了。 https://github.com/rstudio/shiny/blob/master/R/bootstrap.R#L1458
即我想将default
更改为danger
@dmpe ,鉴于 CSS 的工作方式,如果您分配两个不同的类,每个类指定不同的颜色,最后一个会胜出。 所以,在功能上,你已经可以在 Shiny 中做你想做的事了。 我意识到拥有两个颜色类可能看起来很笨重,但它是有效的 CSS。
这适用于所有闪亮按钮,如下所示:
library(shiny)
ui <- fluidPage(
h3("Action Buttons"),
actionButton("default", "Default"),
actionButton("primary", "Primary", class = "btn-primary"),
actionButton("secondary", "Secondary", class = "btn-secondary"),
actionButton("success", "Success", class = "btn-success"),
actionButton("info", "Info", class = "btn-info"),
actionButton("warning", "Warning", class = "btn-warning"),
actionButton("danger", "Danger", class = "btn-danger"),
actionButton("link", "Link", class = "btn-link"),
h3("Download Buttons"),
downloadButton("default", "Default"),
downloadButton("primary", "Primary", class = "btn-primary"),
downloadButton("secondary", "Secondary", class = "btn-secondary"),
downloadButton("success", "Success", class = "btn-success"),
downloadButton("info", "Info", class = "btn-info"),
downloadButton("warning", "Warning", class = "btn-warning"),
downloadButton("danger", "Danger", class = "btn-danger"),
downloadButton("link", "Link", class = "btn-link"),
h3("Bookmark Buttons"),
bookmarkButton("Default"),
bookmarkButton("Primary", class = "btn-primary"),
bookmarkButton("Secondary", class = "btn-secondary"),
bookmarkButton("Success", class = "btn-success"),
bookmarkButton("Info", class = "btn-info"),
bookmarkButton("Warning", class = "btn-warning"),
bookmarkButton("Danger", class = "btn-danger"),
bookmarkButton("Link", class = "btn-link")
)
server <- function(input, output, session) {}
shinyApp(ui, server)
也许对于 bootstrap v4 :) 因为修复非常简单 - 只需添加一个新参数 :)
不,我们不太可能添加新的 a 参数,因为上面的代码已经足够清晰了。 添加复制现有功能的新参数是不好的做法。
由于提供了解决方法而关闭,但请不要犹豫进一步评论或创建新问题。
最有用的评论
@dmpe ,鉴于 CSS 的工作方式,如果您分配两个不同的类,每个类指定不同的颜色,最后一个会胜出。 所以,在功能上,你已经可以在 Shiny 中做你想做的事了。 我意识到拥有两个颜色类可能看起来很笨重,但它是有效的 CSS。
这适用于所有闪亮按钮,如下所示: