diff utils.R @ 9:7b42ee54d757 draft

planemo upload for repository https://github.com/RECETOX/galaxytools/tree/master/tools/recetox_aplcms commit 0873c036d734782d2647b0eea84cd1a0658f5e58
author recetox
date Wed, 19 Jul 2023 00:27:03 +0000
parents 1a01ffa85adc
children 2b6bfa234d8b
line wrap: on
line diff
--- a/utils.R	Thu Jun 22 11:45:30 2023 +0000
+++ b/utils.R	Wed Jul 19 00:27:03 2023 +0000
@@ -16,6 +16,10 @@
     return(df)
 }
 
+restore_sample_name <- function(df) {
+    return(df$sample_id[1])
+}
+
 load_sample_name <- function(df) {
     sample_name <- attr(df, "sample_name")
     if (is.null(sample_name)) {