https://bioinformaticsonline.com/snippets/view/44452/raku-script-to-find-repeats-in-sequences? https://bioinformaticsonline.com/snippets/view/44452/raku-script-to-find-repeats-in-sequences Thu, 01 Feb 2024 01:56:36 -0600 https://bioinformaticsonline.com/snippets/view/44452/raku-script-to-find-repeats-in-sequences sub find-repeats($sequence, $min-repeat-length = 3) { my @repeats; for ^($sequence.chars - $min-repeat-length + 1) -> $i { my $substring = $sequence.substr($i, $min-repeat-length); if $sequence.contains($substring) > 1 && $substring !~~ any(@repeats) { @repeats.push($substring); } } return @repeats; } # Example usage my $genome-sequence = "ATCGATCGATCGATCG"; my @result = find-repeats($genome-sequence); say "Repeats found: ", @result;]]> LEGE