Long reads mapper bash script !
#!/bin/bash #only for LONG READS mapping #USAGE: runMapper.sh minimap2 ref.fa read...c=/home/urbe/Tools/graphmap/bin/Linux-x64/graphmap minimap2L...n echo "Mapping with $toolName" $lamsaLoc index $refF...$toolName == "graphmap" ]; then echo "Mapping with $toolN...2177 days ago
Perl subroutine to read genome/reads fasta file !
...{ my $file = $_[0]; my (%map,$id,$seq); open(IN,$file) or die("Cannot open fi...while(){ chomp; if($_ =~ /^>/){ if(defined $id && defined $seq){...q=$seq.$_; } } $map{$id} = $seq; close(IN); return \%map; }2188 days ago
2182 days ago
2181 days ago
Perl script to merge LastZ overlaps
#!/usr/bin/perl use strict; use warnings; use 5.010; # Filter out the exact/direct overlaps from tab seperated alignment file. (lastz format=general- ready) # Do not inclide header in lastz outfile # USAGE: perl filterOverlaps.pl infile > outfile open my $fh, '2180 days ago
2178 days ago
1571 days ago
Installing Porechop on Ubuntu !
...Tools git:(master) ✗ git clone https://github.com/rrwick/Porechop.git Cloning into 'Porechop'... remote: Counting objects: 1579, done. rem...arcodes] [--untrimmed] [--discard_unassigned...Comma-delimited string of alignment scores: match,...2161 days ago
2154 days ago
Perl script to find palindromic pattern !
#!/usr/bin/perl use strict; use warnings; use strict; my %invert; @invert{ qw[ A C G T ] } = qw[ T G C A ]; my $in = do{ local $/; }; chomp $in;...-2 ) { next unless substr( $in, $p1, 1 ) eq $invert{ substr...if( $pals ) { my $val=substr( $in, $p1-$pals, ($pals+1)*2 );...2154 days ago