Plot custom gene density with R
library(karyoploteR) pp2306 days ago
Estimate Genome Size with Jellyfish and R
jellyfish count -t 8 -C -m 19 -s 5G -o 19mer_out --min-qual-char=? /common/Tutorial/Genome_estimation/sample_read_1.fastq /common/Tutorial/Genome_estimation/sample_re...2302 days ago
Perl script to find palindromic regions in DNA sequences
use strict; use warnings; my $pp = qr/(?: (\w) (?1) \g{-1} | \w? )/ix; my $filename = $ARGV[0]; open(my $fh, '2211 days ago
Perl script to extract the uniq Ids
#!/usr/bin/perl -w use strict; use warnings; use List::Uniq ':all'; open(my $val, "2295 days ago
Perl script to find missing and move to desire folder
#!/usr/bin/perl -w use strict; use warnings; open(my $ids, "2295 days ago
Perl script to count the number of files in a directory with regex
#!/usr/bin/perl use strict; use warnings; my @allNames=("_D14_","_B14_","_B15_","_C1T1_","_C3T3_","_D12_","_D13_","_E1B1_","_E1B3_","_H001_","_H3-03_","_H3-04_","_HB0_"...2294 days ago
Perl script to read multi fasta sequence one by one
#!/usr/bin/env perl use strict; use warnings; #USAGE #perl rohanRun.pl seq.fa my $outfile='tmp.fa'...ef; foreach my $key ( keys %fastaSeq) { open (OUT, ">$outfile") or die "c...files contains multiple sequences; open (IN, "...2277 days ago
2266 days ago
2266 days ago
Biological Sequence handling with Perl !
...e the seq() method"; } # Return the type of the sequence as a human readable string sub type { return 'Generic Sequen...my $self = shift; my ($new_seq,$prepend) = @_; my ($to_append);...ss) if ref($class); my ($sequence,$type) = @_; my $self = bless...2237 days ago