I have a data frame:
runApp( list(ui = bootstrapPage(pageWithSidebar( headerPanel(\"Data frame with colors\"), sidebarPanel(),
Nowadays there is more elegant solution by using shinyTables:
# Install devtools, if you haven't already. install.packages("devtools") library(devtools) install_github("shinyTable", "trestletech") library(shiny) runApp(system.file("examples/01-simple", package="shinyTable"))
Code in github:Example: