Skip to content
Snippets Groups Projects
Commit 51fc4931 authored by Brandi Cantarel's avatar Brandi Cantarel
Browse files

pindel update

parent a4a2a4db
No related merge requests found
...@@ -2,7 +2,6 @@ ...@@ -2,7 +2,6 @@
#parse_pindel #parse_pindel
my $pair_id = shift @ARGV; my $pair_id = shift @ARGV;
my $tid = shift @ARGV;
my $vcf = shift @ARGV; my $vcf = shift @ARGV;
open SI, ">$pair_id.indel.vcf" or die $!; open SI, ">$pair_id.indel.vcf" or die $!;
...@@ -34,7 +33,7 @@ while (my $line = <VCF>) { ...@@ -34,7 +33,7 @@ while (my $line = <VCF>) {
my $newformat = 'GT:DP:AD:AO:RO'; my $newformat = 'GT:DP:AD:AO:RO';
my @newgts = (); my @newgts = ();
my $missingGT = 0; my $missingGT = 0;
my %allele; my @allele;
FG:foreach my $i (0..$#gts) { FG:foreach my $i (0..$#gts) {
my $sid = $subjacc[$i]; my $sid = $subjacc[$i];
my @gtinfo = split(/:/,$gts[$i]); my @gtinfo = split(/:/,$gts[$i]);
...@@ -72,13 +71,11 @@ while (my $line = <VCF>) { ...@@ -72,13 +71,11 @@ while (my $line = <VCF>) {
$missingGT ++; $missingGT ++;
next FG; next FG;
} }
$allele{$tid} = [sprintf("%.4f",$gtdata{AO}/$gtdata{DP}),$gtdata{DP}]; push @allele = sprintf("%.4f",$gtdata{AO}/$gtdata{DP});
push @newgts, join(":",$gtdata{GT},$gtdata{DP},$gtdata{AD},$gtdata{AO},$gtdata{RO}); push @newgts, join(":",$gtdata{GT},$gtdata{DP},$gtdata{AD},$gtdata{AO},$gtdata{RO});
} }
next if ($missingGT == scalar(@gts)); next if ($missingGT == scalar(@gts));
next unless ($allele{$tid});
my ($taf,$tdp) = @{$allele{$tid}};
next if ($taf < 0.05 && $tdp < 10);
if ($hash{SVTYPE} eq 'DUP:TANDEM') { if ($hash{SVTYPE} eq 'DUP:TANDEM') {
print DUP join("\t",$chrom,$pos,$id,$ref,$alt,$score,$filter,$annot,$newformat,@newgts),"\n"; print DUP join("\t",$chrom,$pos,$id,$ref,$alt,$score,$filter,$annot,$newformat,@newgts),"\n";
}elsif ($hash{SVTYPE} eq 'INS') { }elsif ($hash{SVTYPE} eq 'INS') {
......
...@@ -57,7 +57,7 @@ pindel -T $SLURM_CPUS_ON_NODE -f ${reffa} -i ${pair_id}.pindel.config -o ${pair_ ...@@ -57,7 +57,7 @@ pindel -T $SLURM_CPUS_ON_NODE -f ${reffa} -i ${pair_id}.pindel.config -o ${pair_
pindel2vcf -P ${pair_id}.pindel_out -r ${reffa} -R HG38 -d ${genomefiledate} -v pindel.vcf pindel2vcf -P ${pair_id}.pindel_out -r ${reffa} -R HG38 -d ${genomefiledate} -v pindel.vcf
cat pindel.vcf | java -jar $SNPEFF_HOME/SnpSift.jar filter " ( GEN[*].AD[1] >= 10 )" | bgzip > pindel.vcf.gz cat pindel.vcf | java -jar $SNPEFF_HOME/SnpSift.jar filter " ( GEN[*].AD[1] >= 10 )" | bgzip > pindel.vcf.gz
perl $baseDir/norm_annot.sh -r ${index_path} -p pindel -v pindel.vcf.gz perl $baseDir/norm_annot.sh -r ${index_path} -p pindel -v pindel.vcf.gz
perl $baseDir/parse_pindel.pl ${pair_id} $tid pindel.norm.vcf.gz perl $baseDir/parse_pindel.pl ${pair_id} pindel.norm.vcf.gz
java -Xmx10g -jar $SNPEFF_HOME/snpEff.jar -no-intergenic -lof -c $SNPEFF_HOME/snpEff.config GRCh38.86 ${pair_id}.indel.vcf |bgzip > ${pair_id}.pindel_indel.vcf.gz java -Xmx10g -jar $SNPEFF_HOME/snpEff.jar -no-intergenic -lof -c $SNPEFF_HOME/snpEff.config GRCh38.86 ${pair_id}.indel.vcf |bgzip > ${pair_id}.pindel_indel.vcf.gz
java -Xmx10g -jar $SNPEFF_HOME/snpEff.jar -no-intergenic -lof -c $SNPEFF_HOME/snpEff.config GRCh38.86 ${pair_id}.dup.vcf |bgzip > ${pair_id}.pindel_tandemdup.vcf.gz java -Xmx10g -jar $SNPEFF_HOME/snpEff.jar -no-intergenic -lof -c $SNPEFF_HOME/snpEff.config GRCh38.86 ${pair_id}.dup.vcf |bgzip > ${pair_id}.pindel_tandemdup.vcf.gz
java -Xmx10g -jar $SNPEFF_HOME/snpEff.jar -no-intergenic -lof -c $SNPEFF_HOME/snpEff.config GRCh38.86 ${pair_id}.sv.vcf |bgzip > ${pair_id}.pindel_sv.vcf.gz java -Xmx10g -jar $SNPEFF_HOME/snpEff.jar -no-intergenic -lof -c $SNPEFF_HOME/snpEff.config GRCh38.86 ${pair_id}.sv.vcf |bgzip > ${pair_id}.pindel_sv.vcf.gz
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment