| bs4ListGroup | R Documentation | 
Create a list group
Create a list group item
bs4ListGroup(
  ...,
  type = c("basic", "action", "heading"),
  width = 4,
  .list = NULL
)
bs4ListGroupItem(
  ...,
  title = NULL,
  subtitle = NULL,
  footer = NULL,
  active = FALSE,
  disabled = FALSE,
  href = NULL
)
listGroup(..., type = c("basic", "action", "heading"), width = 4, .list = NULL)
listGroupItem(
  ...,
  title = NULL,
  subtitle = NULL,
  footer = NULL,
  active = FALSE,
  disabled = FALSE,
  href = NULL
)
| ... | Item content. | 
| type | List group type. | 
| width | List group width. 4 by default. Between 1 and 12. | 
| .list | Slot for programmatically generated items. | 
| title | Item title (only if type is "heading"). | 
| subtitle | Item subtitle (only if type is "heading"). | 
| footer | Item footer content (only if type is "heading"). | 
| active | Whether the item is active or not. FALSE by default. Only if type is "action" or "heading". | 
| disabled | Whether the item is disabled or not. FALSE by default. Only if type is "action" or "heading". | 
| href | Item external link. | 
David Granjon, dgranjon@ymail.com
if(interactive()){
 library(shiny)
 library(bs4Dash)
 shinyApp(
   ui = dashboardPage(
     header = dashboardHeader(),
     sidebar = dashboardSidebar(),
     controlbar = dashboardControlbar(),
     footer = dashboardFooter(),
     title = "test",
     body = dashboardBody(
      fluidRow(
       listGroup(
        type = "basic",
        listGroupItem("Cras justo odio"),
        listGroupItem("Dapibus ac facilisis in"),
        listGroupItem("Morbi leo risus")
       ),
       listGroup(
        type = "action",
        listGroupItem(
         "Cras justo odio",
         active = TRUE,
         disabled = FALSE,
         href = "https://www.google.com"
        ),
        listGroupItem(
         active = FALSE,
         disabled = FALSE,
         "Dapibus ac facilisis in",
         href = "https://www.google.com"
        ),
        listGroupItem(
         "Morbi leo risus",
         active = FALSE,
         disabled = TRUE,
         href = "https://www.google.com"
        )
       ),
       listGroup(
        type = "heading",
        listGroupItem(
         "Donec id elit non mi porta gravida at eget metus.
         Maecenas sed diam eget risus varius blandit.",
         active = TRUE,
         disabled = FALSE,
         title = "List group item heading",
         subtitle = "3 days ago",
         footer = "Donec id elit non mi porta."
        ),
        listGroupItem(
         "Donec id elit non mi porta gravida at eget metus.
         Maecenas sed diam eget risus varius blandit.",
         active = FALSE,
         disabled = FALSE,
         title = "List group item heading",
         subtitle = "3 days ago",
         footer = "Donec id elit non mi porta."
        )
       )
     )
    )
   ),
   server = function(input, output) {}
 )
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.