# NOT RUN {
app <- dash_app()
app %>% set_layout("hello", "Dash")
app %>% set_layout(div("hello"), "Dash")
app %>% set_layout(list(div("hello"), "Dash"))
app %>% set_layout("Conditional UI using an if statement: ",
if (TRUE) "rendered",
if (FALSE) "not rendered")
app %>% set_layout(function() { div("Current time: ", Sys.time()) })
# }
Run the code above in your browser using DataLab