R: AdminLTE2 social box

socialBox {shinydashboardPlus} | R Documentation

## AdminLTE2 social box

### Description

Create social box

### Usage

    socialBox(..., src = NULL, title = NULL, subtitle = NULL,
      width = 6, height = NULL, collapsible = TRUE, closable = TRUE,
      comments = NULL, footer = NULL, footer_padding = TRUE)

### Arguments

`...` | body content. May include attachmentBlock for instance.
`src` | header image, if any.
`title` | box title.
`subtitle` | box subtitle.
`width` | box width (between 1 and 12).
`height` | box height.
`collapsible` | If TRUE, display a button in the upper right that allows the user to collapse the box.
`closable` | If TRUE, display a button in the upper right that allows the user to close the box.
`comments` | slot for boxComments.
`footer` | box footer, if any.
`footer_padding` | TRUE by default: whether the footer has margin or not.

### Author(s)

David Granjon, dgranjon@ymail.com

### Examples

    if (interactive()) {
     library(shiny)
     library(shinydashboard)
     shinyApp(
      ui = dashboardPage(
        dashboardHeader(),
        dashboardSidebar(),
        dashboardBody(
         socialBox(
          title = "Social Box",
          subtitle = "example-01.05.2018",
          src = "https://adminlte.io/themes/AdminLTE/dist/img/user4-128x128.jpg",
          "Some text here!",
          attachmentBlock(
           src = "http://kiev.carpediem.cd/data/afisha/o/2d/c7/2dc7670333.jpg",
           title = "Test",
           title_url = "http://google.com",
           "This is the content"
          ),
          comments = tagList(
           lapply(X = 1:10, FUN = function(i) {
            boxComment(
              src = "https://adminlte.io/themes/AdminLTE/dist/img/user3-128x128.jpg",
              title = paste("Comment", i),
              date = "01.05.2018",
              paste0("The ", i, "-th comment")
            )
           })
          ),
          footer = "The footer here!"
         )
        ),
        title = "socialBox"
      ),
      server = function(input, output) { }
     )
    }

[Package shinydashboardPlus version 0.6.0 Index]