comparison add_expression_HPA.R @ 15:208b87582b4c draft default tip

"planemo upload commit 9a871575622a1318adc64dad63fa5e3a9d2a19fd"
author proteore
date Wed, 29 Apr 2020 08:51:13 -0400
parents 133309fd6875
children
comparison
equal deleted inserted replaced
14:133309fd6875 15:208b87582b4c
145 stopQuietly() 145 stopQuietly()
146 } 146 }
147 } 147 }
148 148
149 convert_to_previous_header <- function(options){ 149 convert_to_previous_header <- function(options){
150 header = c('Gene','description','Evidence','Antibody','RNA tissue specificity','Reliability (IH)','Reliability (IF)','Subcellular location','RNA tissue specific NX','TPM max in non-specific') 150 header = c('Gene','Gene description','Evidence','Antibody','RNA tissue specificity','Reliability (IH)','Reliability (IF)','Subcellular location','RNA tissue specific NX','TPM max in non-specific')
151 names(header) = c('Gene','description','Evidence','Antibody','RNA tissue category','Reliability (IH)','Reliability (IF)','Subcellular location','RNA TS TPM','TPM max in non-specific') 151 names(header) = c('Gene','Gene description','Evidence','Antibody','RNA tissue category','Reliability (IH)','Reliability (IF)','Subcellular location','RNA TS TPM','TPM max in non-specific')
152 options = names(header[which(header %in% options)]) 152 options = names(header[which(header %in% options)])
153 return(options) 153 return(options)
154 } 154 }
155 155
156 main = function() { 156 main = function() {