comparison lib.r @ 22:65e3e1a39e16 draft

planemo upload commit 23ad0382ec59d66220fd94684a6d158fdef2c7f5-dirty
author lecorguille
date Fri, 22 Jul 2016 11:25:17 -0400
parents 339d92b2c503
children 2a4a811c663d
comparison
equal deleted inserted replaced
21:339d92b2c503 22:65e3e1a39e16
43 listArguments4annotate = append(listArguments4annotate, 43 listArguments4annotate = append(listArguments4annotate,
44 list(multiplier=listArguments[["multiplier"]])) 44 list(multiplier=listArguments[["multiplier"]]))
45 } 45 }
46 # ruleset 46 # ruleset
47 else { 47 else {
48 rulset=read.table(listArguments[["rules"]], h=T, sep=",") 48 rulset=read.table(listArguments[["rules"]], h=T, sep=";")
49 if (ncol(rulset) < 4) rulset=read.table(listArguments[["rules"]], h=T, sep="\t")
50 if (ncol(rulset) < 4) rulset=read.table(listArguments[["rules"]], h=T, sep=",")
51 if (ncol(rulset) < 4) {
52 error_message="Your ruleset file seems not well formatted. The column separators accepted are ; , and tabulation"
53 print(error_message)
54 stop(error_message)
55 }
56
49 listArguments4annotate = append(listArguments4annotate, 57 listArguments4annotate = append(listArguments4annotate,
50 list(rules=rulset)) 58 list(rules=rulset))
51 } 59 }
52 } 60 }
53 61