comparison test-data/generate_test.R @ 2:448beaf9deb8 draft default tip

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:41 +0000
parents 9083012a0abf
children
comparison
equal deleted inserted replaced
1:a0708b9d33be 2:448beaf9deb8
256 input_gr$gene_name[input_gr$gene_id == "gene111"] <- "Gm001" 256 input_gr$gene_name[input_gr$gene_id == "gene111"] <- "Gm001"
257 library(BREW3R.r) 257 library(BREW3R.r)
258 new.gr <- extend_granges(input_gr, big_gr) 258 new.gr <- extend_granges(input_gr, big_gr)
259 library("rtracklayer") 259 library("rtracklayer")
260 export.gff(input_gr, "input.gtf") 260 export.gff(input_gr, "input.gtf")
261 input_gr$exon_id <- NULL
262 export.gff(input_gr, "input_noexonid.gtf")
261 export.gff(big_gr, "second_input.gtf") 263 export.gff(big_gr, "second_input.gtf")
262 export.gff(sort(new.gr, ignore.strand = TRUE), "output.gtf") 264 export.gff(sort(new.gr, ignore.strand = TRUE), "output.gtf")