Commit fdeae68b authored by Leon-Charles Tranchevent's avatar Leon-Charles Tranchevent
Browse files

Linted code.

parent 947909fd
...@@ -34,7 +34,7 @@ run_limma <- function(pheno_data, eset, limma_parameters, ...@@ -34,7 +34,7 @@ run_limma <- function(pheno_data, eset, limma_parameters,
# If necessary we add a block based on a co-factor. # If necessary we add a block based on a co-factor.
# For instance, if we have paired samples. # For instance, if we have paired samples.
if (has_block) { if (has_block) {
clinical_cofactor <- factor(pheno_data[[cofactor_name]]) clinical_cofactor <- factor(pheno_data[[cofactor_name]]) # nolint
design <- stats::model.matrix(~ 0 + clinical + clinical_cofactor) design <- stats::model.matrix(~ 0 + clinical + clinical_cofactor)
colnames(design) <- c(levels(clinical), cofactor_name) colnames(design) <- c(levels(clinical), cofactor_name)
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment