diff --git a/DESCRIPTION b/DESCRIPTION index b0ae639..6202850 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: OmicsProcessing Type: Package Title: OmicsProcessing -Version: 1.1.2 +Version: 1.1.3 Date: 2025-03-03 Authors@R: c( person("Vivian", "Viallon", role = c("aut")), diff --git a/R/normalization_SERRF.R b/R/normalization_SERRF.R index b4b6355..3498953 100644 --- a/R/normalization_SERRF.R +++ b/R/normalization_SERRF.R @@ -77,7 +77,7 @@ normalise_SERRF <- function(df, target_cols = NULL, is_qc = NULL, strata_col = N # ---- Normalize Each Feature ---- for (j in seq_along(target_cols)) { - if (j %% 250 == 1) cat(j, "out of ", target_cols, " features normalised\n") + if (j %% 250 == 1) cat(j, "out of ", length(target_cols), " features normalised\n") feature_name <- target_cols[j] for (batch in batch_levels) {