Learn R Programming

shinyMobile (version 0.7.0)

f7Appbar: Create a Framework 7 appbar

Description

Displayed on top of f7Navbar. Interestingly, f7Appbar can also trigger f7Panel.

Usage

f7Appbar(..., left_panel = FALSE, right_panel = FALSE)

Arguments

...

Any UI content such as f7Searchbar, f7Next and f7Back. It is best practice to wrap f7Next and f7Back in a f7Flex.

left_panel

Whether to enable the left panel. FALSE by default.

right_panel

Whether to enable the right panel. FALSE by default.

Examples

Run this code
# NOT RUN {
if (interactive()) {
 library(shiny)
 library(shinyMobile)

 cities <- names(precip)

 shiny::shinyApp(
   ui = f7Page(
     title = "My app",
     f7Appbar(
       f7Flex(f7Back(targetId = "tabset"),f7Next(targetId = "tabset")),
       f7Searchbar(id = "search1", inline = TRUE)
     ),
     f7TabLayout(
       navbar = f7Navbar(
         title = "f7Appbar",
         hairline = FALSE,
         shadow = TRUE
       ),
       f7Tabs(
         animated = FALSE,
         swipeable = TRUE,
         id = "tabset",
         f7Tab(
           tabName = "Tab 1",
           icon = f7Icon("envelope"),
           active = TRUE,
           "Text 1"
         ),
         f7Tab(
           tabName = "Tab 2",
           icon = f7Icon("today"),
           active = FALSE,
           "Text 2"
         ),
         f7Tab(
           tabName = "Tab 3",
           icon = f7Icon("cloud_upload"),
           active = FALSE,
           "Text 3"
         )
       )
     )
   ),
   server = function(input, output) {}
 )
}
# }

Run the code above in your browser using DataLab