if(interactive()){
library(shiny)
library(shinyMobile)
shinyApp(
ui = f7Page(
title = "Grid",
f7SingleLayout(
navbar = f7Navbar(title = "f7Row, f7Col"),
f7Row(
f7Col(
f7Card(
"This is a simple card with plain text,
but cards can also contain their own header,
footer, list view, image, or any other element."
)
),
f7Col(
f7Card(
title = "Card header",
"This is a simple card with plain text,
but cards can also contain their own header,
footer, list view, image, or any other element.",
footer = tagList(
f7Button(color = "blue", label = "My button"),
f7Badge("Badge", color = "green")
)
)
)
)
)
),
server = function(input, output) {}
)
}
Run the code above in your browser using DataLab