Running examples in 'cbcTools-Ex.R' failed
The error most likely occurred in:

> ### Name: cbc_design
> ### Title: Make a choice-based conjoint survey design
> ### Aliases: cbc_design
> ### Keywords: DoE.base design experiment idefix logit logitr mixed mnl mxl
> 
> ### ** Examples
> 
> library(cbcTools)
> 
> # A simple conjoint experiment about apples
> 
> # Generate all possible profiles
> profiles <- cbc_profiles(
+   price     = c(1, 1.5, 2, 2.5, 3, 3.5, 4, 4.5, 5),
+   type      = c("Fuji", "Gala", "Honeycrisp"),
+   freshness = c('Poor', 'Average', 'Excellent')
+ )
> 
> # Make a survey by randomly sampling from all possible profiles
> # (This is the default setting where method = 'random')
> design_random <- cbc_design(
+   profiles = profiles,
+   n_resp   = 100, # Number of respondents
+   n_alts   = 3,   # Number of alternatives per question
+   n_q      = 6    # Number of questions per respondent
+ )
> 
> # Make a survey using a full factorial design and include a "no choice" option
> design_full <- cbc_design(
+   profiles = profiles,
+   n_resp   = 100, # Number of respondents
+   n_alts   = 3,   # Number of alternatives per question
+   n_q      = 6,   # Number of questions per respondent
+   method   = 'full', # Change this to use a different method, e.g. 'orthogonal', or 'dopt'
+   no_choice = TRUE
+ )
> 
> # Make a survey by randomly sampling from all possible profiles
> # with each level of the "type" attribute appearing as an alternative
> design_random_labeled <- cbc_design(
+   profiles = profiles,
+   n_resp   = 100, # Number of respondents
+   n_alts   = 3,   # Number of alternatives per question
+   n_q      = 6,   # Number of questions per respondent
+   label    = "type"
+ )
> 
> # Make a Bayesian D-efficient design with a prior model specified
> # Note that by speed can be improved by setting parallel = TRUE
> design_bayesian <- cbc_design(
+     profiles  = profiles,
+     n_resp    = 100, # Number of respondents
+     n_alts    = 3,   # Number of alternatives per question
+     n_q       = 6,   # Number of questions per respondent
+     n_start   = 1,   # Defaults to 5, set to 1 here for a quick example
+     priors = list(
+         price     = -0.1,
+         type      = c(0.1, 0.2),
+         freshness = c(0.1, 0.2)
+     ),
+     method = "CEA",
+     parallel = FALSE
+ )
Error in idefix::Decode(des = D$design, n.alts = n_alts, alt.cte = alt_cte,  : 
  'n.alts' does not seem correct based on nrow(des)
Calls: cbc_design -> make_design_bayesian -> <Anonymous>
Execution halted