View source: R/bulma-buttonBadge.R
bulmaButtonBadge | R Documentation |
Create a button with a badge https://wikiki.github.io/elements/badge/.
bulmaButtonBadge(
label = NULL,
url = NULL,
color = NULL,
style = NULL,
loading = FALSE,
size = NULL,
badge_color = NULL,
badge_style = NULL,
badge_size = NULL,
badge_position = NULL,
badge_text = NULL
)
label |
button label. |
url |
The url of the button. |
color |
Color of the button : |
style |
Style of the button : |
loading |
if the button is loading or not. |
size |
Size of the button : |
badge_color |
Color of the button : |
badge_style |
Style of the button : |
badge_size |
Size of the button : |
badge_position |
Position of the badge : |
badge_text |
Badge content: avoid too large content (a number is better). |
David Granjon, dgranjon@ymail.com
if (interactive()) {
library(shiny)
ui <- bulmaPage(
bulmaContainer(
bulmaColumns(
bulmaColumn(
width = 2,
bulmaButtonBadge(label = "test",
url = "http://google.com", color = "danger", style = NULL, loading = FALSE,
size = NULL, badge_color = "warning", badge_style = NULL,
badge_size = NULL, badge_position = NULL, badge_text = 1
),
br(), br(),
bulmaButtonBadge(label = "test",
url = NULL, color = "warning", style = "outlined", loading = FALSE,
size = "small", badge_color = "info", badge_style = NULL,
badge_size = NULL, badge_position = NULL, badge_text = 2
),
br(), br(),
bulmaButtonBadge(label = "test",
url = NULL, color = "success", style = NULL, loading = FALSE,
size = "medium", badge_color = "danger", badge_style = NULL,
badge_size = NULL, badge_position = NULL, badge_text = 3
)
),
bulmaColumn(
width = 2,
bulmaButtonBadge(label = "test",
url = NULL, color = "black", style = "outlined", loading = FALSE,
size = "large", badge_color = NULL, badge_style = NULL,
badge_size = NULL, badge_position = NULL, badge_text = 4
),
br(), br(),
bulmaButtonBadge(label = "test",
url = NULL, color = "info", style = NULL, loading = FALSE,
size = NULL, badge_color = "success", badge_style = NULL,
badge_size = "small", badge_position = NULL, badge_text = 5
),
br(), br(),
bulmaButtonBadge(label = "test",
url = NULL, color = NULL, style = "outlined", loading = FALSE,
size = NULL, badge_color = "warning", badge_style = NULL,
badge_size = "medium", badge_position = "left", badge_text = 6
)
),
bulmaColumn(
width = 2,
bulmaButtonBadge(label = "test",
url = NULL, color = NULL, style = "primary", loading = TRUE,
size = NULL, badge_color = NULL, badge_style = "outlined",
badge_size = "large", badge_position = "botton", badge_text = NULL
)
)
)
)
)
server <- function(input, output, session) {
}
shinyApp(ui = ui, server = server)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.