У меня есть кадр данных:
runApp(
list(ui = bootstrapPage(pageWithSidebar(
headerPanel("Data frame with colors"),
sidebarPanel(),
mainPanel(
tableOutput("my_dataframe")
)
)
)
,
server = function(input, output) {
output$my_dataframe <- renderTable({
data.frame("Brand ID"=1:4,"Client1"=c("red", "green", "green", "green"),
"Client2"=c("green", "red", "green", "red"))
})
}
)
)
Можно ли покрасить кадр данных, например:
Например, когда у меня есть contidion1, мне нужно покрасить ячейку фрейма данных красным цветом, при условии2 - зеленым.
Любая помощь будет действительно оценена.