1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
|
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/controls.R
\name{bscols}
\alias{bscols}
\title{Arrange HTML elements or widgets in Bootstrap columns}
\usage{
bscols(..., widths = NA, device = c("xs", "sm", "md", "lg"))
}
\arguments{
\item{...}{\code{htmltools} tag objects, lists, text, HTML widgets, or
NULL. These arguments should be unnamed.}
\item{widths}{The number of columns that should be assigned to each of the
\code{...} elements (the total number of columns available is always 12).
The width vector will be recycled if there are more \code{...} arguments.
\code{NA} columns will evenly split the remaining columns that are left
after the widths are recycled and non-\code{NA} values are subtracted.}
\item{device}{The class of device which is targeted by these widths; with
smaller screen sizes the layout will collapse to a one-column,
top-to-bottom display instead. xs: never collapse, sm: collapse below
768px, md: 992px, lg: 1200px.}
}
\value{
A \code{\link[htmltools]{browsable}} HTML element.
}
\description{
This helper function makes it easy to put HTML elements side by side. It can
be called directly from the console but is especially designed to work in an
R Markdown document. Warning: This will bring in all of Bootstrap!
}
\examples{
\donttest{
library(htmltools)
# If width is unspecified, equal widths will be used
bscols(
div(style = css(width="100\%", height="400px", background_color="red")),
div(style = css(width="100\%", height="400px", background_color="blue"))
)
# Use NA to absorb remaining width
bscols(widths = c(2, NA, NA),
div(style = css(width="100\%", height="400px", background_color="red")),
div(style = css(width="100\%", height="400px", background_color="blue")),
div(style = css(width="100\%", height="400px", background_color="green"))
)
# Recycling widths
bscols(widths = c(2, 4),
div(style = css(width="100\%", height="400px", background_color="red")),
div(style = css(width="100\%", height="400px", background_color="blue")),
div(style = css(width="100\%", height="400px", background_color="red")),
div(style = css(width="100\%", height="400px", background_color="blue"))
)
}
}
|
