# NOT RUN {
if (interactive()) {
library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
shinyApp(
ui = dashboardPagePlus(
dashboardHeaderPlus(),
dashboardSidebar(),
dashboardBody(
boxPlus(
"Box with messages",
solidheader = TRUE,
status = "warning",
userMessages(
width = 12,
status = "success",
userMessage(
author = "Alexander Pierce",
date = "20 Jan 2:00 pm",
src = "https://adminlte.io/themes/AdminLTE/dist/img/user1-128x128.jpg",
side = NULL,
"Is this template really for free? That's unbelievable!"
),
userMessage(
author = "Sarah Bullock",
date = "23 Jan 2:05 pm",
src = "https://adminlte.io/themes/AdminLTE/dist/img/user3-128x128.jpg",
side = "right",
"You better believe it!"
)
)
),
userMessages(
width = 6,
status = "danger",
userMessage(
author = "Alexander Pierce",
date = "20 Jan 2:00 pm",
src = "https://adminlte.io/themes/AdminLTE/dist/img/user1-128x128.jpg",
side = NULL,
"Is this template really for free? That's unbelievable!"
),
userMessage(
author = "Sarah Bullock",
date = "23 Jan 2:05 pm",
src = "https://adminlte.io/themes/AdminLTE/dist/img/user3-128x128.jpg",
side = "right",
"You better believe it!"
)
)
),
title = "user Message"
),
server = function(input, output) { }
)
}
# }
Run the code above in your browser using DataLab