library(cbcTools)
# Create profiles and design
profiles <- cbc_profiles(
price = c(1, 2, 3),
type = c("A", "B", "C"),
quality = c("Low", "High")
)
design <- cbc_design(
profiles = profiles,
n_alts = 2,
n_q = 4
)
# Inspect all sections (default) - prints automatically
cbc_inspect(design)
# Store results for later use
inspection <- cbc_inspect(design, sections = "balance")
inspection # prints the same output
# Verbose output with technical details
cbc_inspect(design, verbose = TRUE)
Run the code above in your browser using DataLab