annotate chrprefix.sh @ 0:e77c9484b2d0 draft default tip

Uploaded
author saskia-hiltemann
date Thu, 22 Oct 2015 09:18:30 -0400
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
1 #!/bin/bash
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
2
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
3 inputfile=$1
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
4 col=$2
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
5 addremove=$3
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
6 outputfile=$4
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
7
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
8 echo "args: $@"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
9 echo "inputfile: $inputfile"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
10 echo "column: $column"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
11 echo "addremove: $addremove"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
12 echo "outputfile: $outputfile"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
13
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
14 #get column number
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
15 column=`expr match "$col" '\([0-9]*\)'`
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
16 echo "colnumber: $column"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
17
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
18 if [ $addremove == "add" ]
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
19 then
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
20 echo "adding prefix to column $column"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
21 awk 'BEGIN{
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
22 FS="\t"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
23 OFS="\t"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
24 c="'"$column"'"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
25 }{
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
26 if (index($0,"#")!=1){
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
27 $c="chr"$c
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
28 }
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
29 print $0
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
30
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
31 }END{}' $inputfile > $outputfile
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
32
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
33 else #remove prefix
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
34 echo "removing prefix from column $column"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
35 awk 'BEGIN{
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
36 FS="\t"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
37 OFS="\t"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
38 c="'"$column"'"
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
39 }{
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
40 if (FNR>1 && index($0,"#")!=1){
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
41 $c=substr($c,4)
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
42 }
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
43 print $0
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
44
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
45 }END{}' $inputfile > $outputfile
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
46 fi
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
47
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
48 echo "inputfile: "
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
49 head -5 $inputfile
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
50
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
51 echo "outputfile: "
e77c9484b2d0 Uploaded
saskia-hiltemann
parents:
diff changeset
52 head -5 $outputfile