annotate 2.4/src/Subset_targets.sh @ 0:00b9898b8510 draft

Uploaded
author plus91-technologies-pvt-ltd
date Wed, 04 Jun 2014 03:41:27 -0400
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
1 #!/bin/sh
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
2 #$ -V
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
3 #$ -cwd
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
4 #$ -q 1-day
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
5 #$ -m ae
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
6 #$ -M hart.steven@mayo.edu
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
7 #$ -l h_vmem=1G
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
8 #$ -l h_stack=10M
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
9 BAM=$1
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
10 TARGET_BED=$2
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
11 SAMPLE_NUMBER=$3
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
12
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
13 #cat $HEADER > out.${SAMPLE_NUMBER}.sam
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
14 samtools view -L $TARGET_BED $BAM|
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
15 perl -ane '
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
16 next if ($F[10]=~/#/);
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
17 $minSize=1000;
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
18 if( $F[1] & 8 || $F[1] & 4 || $F[8] == 0 || abs($F[8]) > $minSize || $F[5] =~/S/){
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
19 $rName=join("","@",@F[0]);
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
20 print join ("\n",$rName,$F[9],"+",@F[10])."\n";
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
21 };
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
22 ' >> out.${SAMPLE_NUMBER}.fq
00b9898b8510 Uploaded
plus91-technologies-pvt-ltd
parents:
diff changeset
23 echo "Done with $BAM `date`"