@@ -127,6 +127,28 @@ perl -alne 'print join(qq{\t},$F[0],0,$F[1],2);' < $REF_BASE/genome.fa.fai | tee
127127
128128echo " Setting up Parallel block 1"
129129
130+ echo -e " \t[Parallel block 1] CaVEMan setup added..."
131+ do_parallel[CaVEMan_setup]=" caveman.pl \
132+ -r $REF_BASE /genome.fa.fai \
133+ -ig $REF_BASE /caveman/HiDepth.tsv \
134+ -b $REF_BASE /caveman/flagging \
135+ -ab $REF_BASE /vagrent \
136+ -u $REF_BASE /caveman \
137+ -s '$SPECIES ' \
138+ -sa $ASSEMBLY \
139+ -t $CPU \
140+ -st $PROTOCOL \
141+ -tc $TMP /tum.cn.bed \
142+ -nc $TMP /norm.cn.bed \
143+ -td 5 -nd 2 \
144+ -tb $BAM_MT_TMP \
145+ -nb $BAM_WT_TMP \
146+ -c $SNVFLAG \
147+ -f $REF_BASE /caveman/flagging/flag.to.vcf.convert.ini \
148+ -e $CAVESPLIT \
149+ -o $OUTPUT_DIR /${PROTOCOL} _${NAME_MT} _vs_${NAME_WT} /caveman \
150+ -p setup"
151+
130152echo -e " \t[Parallel block 1] BB splitlocifiles added..."
131153if [ ! -z ${SKIPBB+x} ]; then
132154 do_parallel[splitlocifiles]=" echo 'BB splitlocifiles count disabled by params'"
@@ -186,6 +208,28 @@ else
186208 -t $CPU "
187209fi
188210
211+ echo -e " \t[Parallel block 2] CaVEMan split added..."
212+ do_parallel[CaVEMan_split]=" caveman.pl \
213+ -r $REF_BASE /genome.fa.fai \
214+ -ig $REF_BASE /caveman/HiDepth.tsv \
215+ -b $REF_BASE /caveman/flagging \
216+ -ab $REF_BASE /vagrent \
217+ -u $REF_BASE /caveman \
218+ -s '$SPECIES ' \
219+ -sa $ASSEMBLY \
220+ -t $CPU \
221+ -st $PROTOCOL \
222+ -tc $TMP /tum.cn.bed \
223+ -nc $TMP /norm.cn.bed \
224+ -td 5 -nd 2 \
225+ -tb $BAM_MT_TMP \
226+ -nb $BAM_WT_TMP \
227+ -c $SNVFLAG \
228+ -f $REF_BASE /caveman/flagging/flag.to.vcf.convert.ini \
229+ -e $CAVESPLIT \
230+ -o $OUTPUT_DIR /${PROTOCOL} _${NAME_MT} _vs_${NAME_WT} /caveman \
231+ -p split"
232+
189233echo " Starting Parallel block 2: ` date` "
190234run_parallel do_parallel
191235
@@ -252,7 +296,7 @@ set -x
252296ASCAT_CN=" $OUTPUT_DIR /${PROTOCOL} _${NAME_MT} _vs_${NAME_WT} /ascat/$NAME_MT .copynumber.caveman.csv"
253297perl -ne ' @F=(split q{,}, $_)[1,2,3,4]; $F[1]-1; print join("\t",@F)."\n";' < $ASCAT_CN > $TMP /norm.cn.bed
254298perl -ne ' @F=(split q{,}, $_)[1,2,3,6]; $F[1]-1; print join("\t",@F)."\n";' < $ASCAT_CN > $TMP /tum.cn.bed
255- NORM_CONTAM=` perl -ne ' if(m/^rho\s(.+)\n/){print 1-$1;}' $OUTPUT_DIR /${PROTOCOL} _${NAME_MT} _vs_${NAME_WT} /ascat/$NAME_MT `
299+ NORM_CONTAM=` perl -ne ' if(m/^rho\s(.+)\n/){print 1-$1;}' $OUTPUT_DIR /${PROTOCOL} _${NAME_MT} _vs_${NAME_WT} /ascat/$NAME_MT .samplestatistics.txt `
256300set +x
257301
258302# unset and redeclare the parallel array ready for next block
0 commit comments