# NOT RUN {
if (interactive()) {
library(shiny)
library(shinydashboard)
shinyApp(
ui = dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody(
box(
title = "Product List",
status = "primary",
productList(
productListItem(
src = "https://image.darty.com/hifi_video/televiseurs-led/grand_ecran_led/samsung_ue55mu9005_4k_uhd_s1703224306074A_140323143.jpg",
productTitle = "Samsung TV",
productPrice = "$1800",
priceColor = "warning",
"This is an amazing TV, but I don't like TV!"
),
productListItem(
src = "http://icon-park.com/imagefiles/imac.png",
productTitle = "Imac 27",
productPrice = "$2400",
priceColor = "danger",
"This is were I spend most of my time!"
)
)
)
),
title = "Product List"
),
server = function(input, output) { }
)
}
# }
Run the code above in your browser using DataLab