Description Usage Arguments Author(s) Examples
View source: R/gentelellaNavbar.R
Create a Gentelella notification menu
1 2 |
... |
slot for notifItem |
id |
menu id. Must be unique. |
icon |
menu icon |
status |
menu status: "danger", "warning", "info", "success" or "primary" |
expanded |
Whether the dropdown menu is open or not. FALSE by default. |
David Granjon, dgranjon@ymail.com
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | if (interactive()) {
library(shiny)
library(gentelellaShiny)
shinyApp(
ui = gentelellaPageCustom(
navbar = gentelellaNavbar(
navbarItems = notif(
id = "menunotif",
icon = icon("envelope-o"),
status = "danger",
expanded = TRUE,
lapply(X = 1:5, FUN = function(i) {
notifItem(
title = "John Doe",
date = "3 min ago",
img = paste0("https://image.flaticon.com/icons/svg/163/16382", i,".svg"),
"Film festivals used to be do-or-die moments
for movie makers. They were where..."
)
})
)
),
sidebar = gentelellaSidebar(),
body = gentelellaBody(),
footer = gentelellaFooter()
),
server <- function(input, output) {}
)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.