2760 days ago
2749 days ago
Calculate ATGC percentage in parallel with perl
...d there's your value $sequences{$id} = $seq; } my $max_procs = 5; my @names = keys %sequenc...b { #print "** Have to wait for one children ...\n" }, 0.5 ); NAMES: foreach...2712 days ago
BASH script for SelfBLAST a genome
..."Something went wrong $USER - Contact jitendra" fi echo "Doing alignments -- BLASting"; blastn -task megablast -query $SEQ -db $MYDB -evalue 1e-5 -num_threads $THREAD -max_tar...2708 days ago
2692 days ago
picard tools command to get some insert statistics
...e=8g -jar $PICARD_HOME/picard.jar CollectInsertSizeMetrics MINIMUM_PCT=0 HISTOGRAM_FILE=.pdf INPUT= OUTPUT=.sorted.collectInseSize HISTOGRAM_WIDTH=5001393 days ago
2550 days ago
2525 days ago
2522 days ago
Genetic Algorithms demonstration with word DNA in Perl
...w # GA demonstration with word DNA (512 bits) use strict; use Dat...ood starting point my $dna_length = 512; # 4 "letters" in...dna}, $byte-1, 8) = vec(((rand() < 0.5) ? $dna1 : $dna2), $byte-...c($new_dna, $byte-1, 8) &= int(rand(256)); vec($new_dna, $byte-1...2428 days ago