# NOT RUN {
### Equal width columns
container(
columns(
column(
"Aliquam erat volutpat."
),
column(
"Mauris mollis tincidunt felis."
),
column(
"Cum sociis natoque penatibus et magnis dis parturient montes,",
"nascetur ridiculus mus."
)
)
)
### Shiny's panel with sidebar layout
container(
columns(
column(
width = 4,
card(
title = "Sidebar",
formGroup(
label = "Control 1",
selectInput("control1", "...")
),
formGroup(
label = "Control 2",
selectInput("control2", "...")
),
formGroup(
label = "Control 3",
selectInput("control3", "...")
)
)
),
column(
d4("Main panel")
)
)
)
### Mobile friendly grids
# Use `column()`s [responsive] `width` argument to make mobile friendly
# applications.
container(
columns(
column(
width = c(sm = 4),
"Mauris ac felis vel velit tristique imperdiet."
),
column(
width = c(sm = 4),
"Nam vestibulum accumsan nisl."
),
column(
width = c(sm = 4),
"Proin neque massa, cursus ut, gravida ut, lobortis eget, lacus."
)
)
)
# or
container(
columns(
column(
width = c(sm = 4),
"Aenean in sem ac leo mollis blandit."
),
column(
width = c(sm = 8),
"Nulla posuere. In id erat non orci commodo lobortis."
)
)
)
### Fit columns to their content
container(
columns(
column(),
column(
width = "content",
"Cras placerat accumsan nulla. Aenean in sem ac leo mollis blandit."
),
column()
)
)
# }
Run the code above in your browser using DataLab