diff add_protein_features.R @ 12:1a4cfa7a3a27 draft

planemo upload commit 77279e994f5751c6cd9aa165aa0604db3d241271-dirty
author proteore
date Mon, 11 Mar 2019 09:16:00 -0400
parents 8df559ad14a7
children 0116d444d21f
line wrap: on
line diff
--- a/add_protein_features.R	Fri Jan 18 04:13:47 2019 -0500
+++ b/add_protein_features.R	Mon Mar 11 09:16:00 2019 -0400
@@ -1,6 +1,6 @@
 # Read file and return file content as data.frame
 read_file <- function(path,header){
-  file <- try(read.table(path,header=header, sep="\t",stringsAsFactors = FALSE, quote="", check.names = F),silent=TRUE)
+  file <- try(read.csv(path,header=header, sep="\t",stringsAsFactors = FALSE, quote="", check.names = F),silent=TRUE)
   if (inherits(file,"try-error")){
     stop("File not found !")
   }else{