if (FALSE) {
library(furniture)
data <- data.frame(
x = sample(c(1,2,3,4), 100, replace=TRUE),
y = rnorm(100)
)
## Basic Use
tableF(data, x)
tableF(data, y)
## Adjust the number of items shown
tableF(data, y, n = 10)
## Add splitby
tableF(data, x, splitby = y)
}
Run the code above in your browser using DataLab