Complains about confounding even though adjust_batch="no" and adjust_bio="no"

[drisso]

  if(!is.null(bio) & !is.null(batch)) {
    tab <- table(bio, batch)
    if(all(colSums(tab>0)==1)){
      if(nlevels(bio) == nlevels(batch)) {
        stop("Biological conditions and batches are confounded. They cannot both be included in the model, please set at least one of 'adjust_bio' and 'adjust_batch' to 'no.'")
      } else {
        nested <- TRUE
      }
    }
  }

[drisso]

Closed in develop