teal_modifiers | R Documentation |
teal
UI objectsReplace UI Elements in teal
UI objects
modify_title(x, title = "teal app", favicon = NULL)
modify_header(x, element = tags$p())
modify_footer(x, element = tags$p())
x |
( |
title |
( |
favicon |
( |
element |
Replacement UI element (shiny tag or HTML) |
app <- init(
data = teal_data(IRIS = iris, MTCARS = mtcars),
modules = modules(example_module())
) |>
modify_title(title = "Custom title")
if (interactive()) {
shinyApp(app$ui, app$server)
}
app <- init(
data = teal_data(IRIS = iris),
modules = modules(example_module())
) |>
modify_header(element = tags$div(h3("Custom header")))
if (interactive()) {
shinyApp(app$ui, app$server)
}
app <- init(
data = teal_data(IRIS = iris),
modules = modules(example_module())
) |>
modify_footer(element = "Custom footer")
if (interactive()) {
shinyApp(app$ui, app$server)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.