Mercurial > repos > iuc > brew3r_r

diff brew3r.r_script.R @ 3:d3b0390f325f draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/brew3r_r commit d287d5688e57f4154d5875789e0cd4d5c87f11ce
author iuc
date Thu, 03 Oct 2024 22:35:49 +0000
parents 3198f52bffaa
children
line wrap: on
line diff
--- a/brew3r.r_script.R	Thu Jun 27 07:31:23 2024 +0000
+++ b/brew3r.r_script.R	Thu Oct 03 22:35:49 2024 +0000
@@ -97,6 +97,18 @@
     }
 }
 
+if (is.null(input_gr_to_extend$exon_id)) {
+    is.exon <- which(input_gr_to_extend$type == "exon")
+    input_gr_to_extend$exon_id <- NA
+    input_gr_to_extend$exon_id[is.exon] <- paste0(
+        "EXON",
+        sprintf(
+            "%010d",
+            1:length(is.exon)
+        )
+    )
+}
+
 # Run BREW3R.r main function
 if (length(input_gr_template) > 0) {
     new_gr_exons <- extend_granges(