# NOT RUN {
shinyUI(fluidPage(
tags$head(
# This is content that will always be rendered
tags$title("My secure app")
),
crunchyBody(
# This is content that only is rendered if the user is authorized
fluidRow(
column(6, h1("Column 1")),
column(6, h1("Column 2"))
)
)
))
# }
Run the code above in your browser using DataCamp Workspace