# NOT RUN {
### Navbar with tabs
div(
navbar(
brand = "Navbar",
navInput(
id = "tabs",
choices = c("Home", "About", "Our process")
) %>%
margin(right = "auto"),
formInput(
inline = TRUE,
id = "navForm",
searchInput("search", placeholder = "Search") %>%
margin(right = c(sm = 2)),
submit = buttonInput("search", "Search") %>%
background("amber")
)
) %>%
background("teal"),
container(
navContent(
navPane(
h3("Home")
),
navPane(
h3("About")
),
navPane(
h3("The process")
)
)
)
)
# }
Run the code above in your browser using DataLab