This function loads the insert text component to display additional information in a special format.
Examples
if (interactive()) {
ui <- fluidPage(
shinyGovstyle::header(
main_text = "Example",
secondary_text = "User Examples",
logo="shinyGovstyle/images/moj_logo.png"),
shinyGovstyle::gov_layout(size = "two-thirds",
shinyGovstyle::insert_text(
inputId = "note",
text = "It can take up to 8 weeks to register a lasting power of
attorney if there are no mistakes in the application."
)
),
shinyGovstyle::footer(full = TRUE)
)
server <- function(input, output, session) {}
shinyApp(ui = ui, server = server)
}