# NOT RUN {
### Using flexbox
# When using `flex()` be sure to set the display, too.
div(
lapply(
1:5,
function(i) {
div() %>%
padding(5) %>%
margin(top = c(xs = 2), bottom = c(xs = 2)) %>%
background("blue")
}
)
) %>%
display("flex") %>%
flex(
direction = c(xs = "column", sm = "row"),
justify = c(sm = "around")
)
# }
Run the code above in your browser using DataLab