Perl script to delete the adjacent repeats !
/usr/bin/perl #Mostly the interview question for bioinfomatician ! #Write a code to delete the adjacent repeated character .... $string='ATTTTTTGGC'; # This sho...1513 days ago
Perl script to find inverted repeats !
#!/usr/bin/perl use strict; use warnings; use Bio::SeqIO; use Bio::Tools::Run::RepeatMasker; my $genome_file = "genome.fasta"; # read genome sequence my...388 days ago
Raku script to find SSRs in fastq file !
...nce) { my @ssrs; for 2..$sequence.chars -> $min-repeats { for $sequence.chars...$min-repeats -> $max-repeat {...eat = $sequence.substr($min-repeats - 1, $max-repeat - $min-repeats + 1); my $repeat...75 days ago
Raku script to find repeats in sequences !
sub find-repeats($sequence, $min-repeat-length = 3) { my @repeats; for ^($sequence.chars - $min-rep...s($substring) > 1 && $substring !~~ any(@repeats) { @repeats.push...= "ATCGATCGATCGATCG"; my @result = find-repeats($genome-sequence); say "Re...57 days ago
Python script to find repeats in the DNA sequence !
def find_repeats(sequence, min_repeat_length=3): repeats = [] for i in range(len(sequen...count(substring) > 1 and substring not in repeats: repeats.append(...uence = "ATCGATCGATCGATCG" result = find_repeats(genome_sequence) print("Re...57 days ago