Nothing
### test data
##' @noRd
{
## vector
v <- 1 : 3
names (v) <- letters [1 : 3]
## matrix
m <- matrix (1:6, 2,
dimnames = list (rows = letters [1:2],
columns = LETTERS [1:3]))
## array
a <- array (1 : 24, 4 : 2,
dimnames = list (rows = letters [1:4],
columns = LETTERS [1:3],
d3 = 1:2)
)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.