comparison cummeRbund.R @ 5:78fcfc04fcfe draft

planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
author devteam
date Thu, 23 Feb 2017 20:24:03 -0500
parents 587c425b4e76
children c3b54a4b7741
comparison
equal deleted inserted replaced
4:ba8fde59843d 5:78fcfc04fcfe
1 ## Feature Selection ## 1 ## Feature Selection ##
2 options(echo=TRUE)
2 get_features <- function(myGenes, f="gene") { 3 get_features <- function(myGenes, f="gene") {
3 if (f == "isoforms") 4 if (f == "isoforms")
4 return(isoforms(myGenes)) 5 return(isoforms(myGenes))
5 else if (f == "tss") 6 else if (f == "tss")
6 return(TSS(myGenes)) 7 return(TSS(myGenes))