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_read_2.fast...he run. eg: 1,2,3,..etc. #-C -both-strands Count both strands #-m...2252 days ago
2216 days ago
2216 days ago
Perl script to find the distance beetween all the contigs and scaffolds
#!/usr/bin/perl use strict; use warnings; use Bio::SeqIO; $| =...distance beetween all the contigs and scaffolds #Usage: perl clustalReads.pl genome.fa...filename = shift @_; my $filehandle; if ($filename =~ /gz$/)...} else { open $filehandle, "$f...2146 days ago
Perl script to run SATSUMA in loop !
#!/usr/bin/perl -w use strict; use File::Temp qw(tempfile);...file name here my $seqfile=""; my $queryfile = "genome.fasta"; # Ur query genome my $tarfile = "renamedAdinet...s") { my $idFile="palindrome_ids.txt"; open my $handle, '2146 days ago
Perl script to convert GFF 2 FASTA !
#!/usr/bin/perl use strict; use warnings; use Bio::Seq; use B...ted sequence (starting with ATG and ending...e gene sequence (including UTRs and introns) # upstream3000 - the 3...omoter) ### First, index the genome my $file_fasta = $ARGV[0];...sta->new($file_fasta); print ("Genome fas...2145 days ago
2143 days ago
Perl subroutine to read genome/reads fasta file !
sub readSeqFromFasta{ my $file = $_[0]; my (%map,$id,$seq); open(IN,$file) or die("Cannot open file for reading $file:$!\n"); while(){ chomp; if($_ =~ /^>/)...2139 days ago
2132 days ago
2081 days ago