Mercurial > repos > recetox > recetox_aplcms_compute_clusters

diff utils.R @ 1:092bbb03a217 draft
planemo upload for repository https://github.com/RECETOX/galaxytools/tree/master/tools/recetox_aplcms commit 4254c6f6f05915ceab5af5d7040ac2c44a8364b4
author: recetox
date: Mon, 03 Apr 2023 14:56:58 +0000
parents: 82737757f3d5
children: ce00e1d03c31
--- a/utils.R	Mon Feb 13 10:27:56 2023 +0000
+++ b/utils.R	Mon Apr 03 14:56:58 2023 +0000
@@ -123,3 +123,13 @@
                      paste(sample_names, collapse = ", ")))
     }
 }
+
+determine_sigma_ratios <- function(sigma_ratio_lim_min = NA, sigma_ratio_lim_max = NA) {
+    if (is.na(sigma_ratio_lim_min)) {
+        sigma_ratio_lim_min <- 0
+    }
+    if (is.na(sigma_ratio_lim_max)) {
+        sigma_ratio_lim_max <- Inf
+    }
+    return(c(sigma_ratio_lim_min, sigma_ratio_lim_max))
+}