comparison goprofiles.R @ 7:3e138d54c105 draft

planemo upload commit 4e898239997b7ef266b1d0ce0a4c7cdec31b4ecd-dirty
author proteore
date Fri, 21 Sep 2018 10:08:02 -0400
parents 6afe8166a9a4
children 386145573c19
comparison
equal deleted inserted replaced
6:6afe8166a9a4 7:3e138d54c105
214 } 214 }
215 header = args$header 215 header = args$header
216 # Get file content 216 # Get file content
217 file = readfile(filename, header) 217 file = readfile(filename, header)
218 # Extract Protein IDs list 218 # Extract Protein IDs list
219 input = unlist(strsplit(file[,ncol],";")) 219 input = unlist(strsplit(as.character(file[,ncol]),";"))
220 input = input [which(!is.na(input))] 220 input = input [which(!is.na(input))]
221 } 221 }
222 222
223 if (! any(check_ids(input,id_type))){ 223 if (! any(check_ids(input,id_type))){
224 stop(paste(id_type,"not found in your ids list, please check your IDs in input or the selected column of your input file")) 224 stop(paste(id_type,"not found in your ids list, please check your IDs in input or the selected column of your input file"))