Nothing
## ----setup, include=FALSE-----------------------------------------------------
knitr::opts_chunk$set(echo = TRUE)
## -----------------------------------------------------------------------------
library(dad)
data("roses")
x <- roses[, c("Sha", "Den", "Sym", "rose")]
head(x)
## -----------------------------------------------------------------------------
rosesf <- as.folder(x, groups = "rose")
print(rosesf, max = 9)
## -----------------------------------------------------------------------------
library(dad)
data(roseflowers)
df1 <- roseflowers$variety
df2 <- roseflowers$flower
## -----------------------------------------------------------------------------
fh1 <- folderh(df1, "rose", df2)
print(fh1)
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.