X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=code_ruby%2Flib%2Fmaasha%2Fseq.rb;h=73bf0552938cef82fa937aa43ff7be23b190c94b;hb=0ab290c76c4e253ea809f9a7c2321a28de72b286;hp=4a0af47ed0f5fde9d5ffe87ca19a3caec087f6d6;hpb=b982cc677363d7458963b610ec53bf2c4f7476a9;p=biopieces.git diff --git a/code_ruby/lib/maasha/seq.rb b/code_ruby/lib/maasha/seq.rb index 4a0af47..73bf055 100644 --- a/code_ruby/lib/maasha/seq.rb +++ b/code_ruby/lib/maasha/seq.rb @@ -27,8 +27,11 @@ require 'maasha/seq/digest' require 'maasha/seq/trim' require 'narray' -autoload :BackTrack, 'maasha/seq/backtrack.rb' -autoload :Dynamic, 'maasha/seq/dynamic.rb' +autoload :BackTrack, 'maasha/seq/backtrack' +autoload :Dynamic, 'maasha/seq/dynamic' +autoload :Homopolymer, 'maasha/seq/homopolymer' +autoload :Levenshtein, 'maasha/seq/levenshtein' +autoload :Ambiguity, 'maasha/seq/ambiguity' # Residue alphabets DNA = %w[a t c g] @@ -67,13 +70,12 @@ TRANS_TAB11 = { "GTG" => "V", "GCG" => "A", "GAG" => "E", "GGG" => "G" } - # Error class for all exceptions to do with Seq. class SeqError < StandardError; end class Seq # Quality scores bases - SCORE_BASE = 64 + SCORE_BASE = 33 SCORE_MIN = 0 SCORE_MAX = 40 @@ -87,7 +89,7 @@ class Seq def self.new_bp(record) seq_name = record[:SEQ_NAME] seq = record[:SEQ] - type = record[:SEQ_TYPE] + type = record[:SEQ_TYPE].to_sym if record[:SEQ_TYPE] qual = record[:SCORES] self.new(seq_name, seq, type, qual) @@ -98,9 +100,9 @@ class Seq raise SeqError, "Cannot generate negative oligo length: #{length}" if length <= 0 case type.downcase - when /dna/ then alph = DNA - when /rna/ then alph = RNA - when /protein/ then alph = PROTEIN + when :dna then alph = DNA + when :rna then alph = RNA + when :protein then alph = PROTEIN else raise SeqError, "Unknown sequence type: #{type}" end @@ -140,9 +142,9 @@ class Seq raise SeqError, "Guess failed: sequence is nil" if self.seq.nil? case self.seq[0 ... 100].downcase - when /[flpqie]/ then return "protein" - when /[u]/ then return "rna" - else return "dna" + when /[flpqie]/ then return :protein + when /[u]/ then return :rna + else return :dna end end @@ -190,24 +192,24 @@ class Seq # Method that returns true is a given sequence type is DNA. def is_dna? - self.type == 'dna' + self.type == :dna end # Method that returns true is a given sequence type is RNA. def is_rna? - self.type == 'rna' + self.type == :rna end # Method that returns true is a given sequence type is protein. def is_protein? - self.type == 'protein' + self.type == :protein end # Method to transcribe DNA to RNA. def to_rna raise SeqError, "Cannot transcribe 0 length sequence" if self.length == 0 raise SeqError, "Cannot transcribe sequence type: #{self.type}" unless self.is_dna? - self.type = 'rna' + self.type = :rna self.seq.tr!('Tt','Uu') end @@ -215,14 +217,13 @@ class Seq def to_dna raise SeqError, "Cannot reverse-transcribe 0 length sequence" if self.length == 0 raise SeqError, "Cannot reverse-transcribe sequence type: #{self.type}" unless self.is_rna? - - self.type = 'dna' + self.type = :dna self.seq.tr!('Uu','Tt') end # Method to translate a DNA sequence to protein. def translate!(trans_tab = 11) - raise SeqError, "Sequence type must be 'dna' - not #{self.type}" unless self.type == 'dna' + raise SeqError, "Sequence type must be 'dna' - not #{self.type}" unless self.type == :dna raise SeqError, "Sequence length must be a multiplum of 3 - was: #{self.length}" unless (self.length % 3) == 0 case trans_tab @@ -257,7 +258,7 @@ class Seq self.seq = protein self.qual = nil - self.type = "protein" + self.type = :protein self end @@ -384,28 +385,35 @@ class Seq # Method to determine the Hamming Distance between # two Sequence objects (case insensitive). - def hamming_distance(seq) - self.seq.upcase.hamming_distance(seq.seq.upcase) + def hamming_distance(entry, options = nil) + if options and options[:ambiguity] + Ambiguity.hamming_distance(self.seq, entry.seq) + else + self.seq.upcase.hamming_distance(entry.seq.upcase) + end + end + + # Method to determine the Edit Distance between + # two Sequence objects (case insensitive). + def edit_distance(entry) + Levenshtein.distance(self.seq, entry.seq) end # Method that generates a random sequence of a given length and type. def generate(length, type) raise SeqError, "Cannot generate sequence length < 1: #{length}" if length <= 0 - case type.downcase - when "dna" - alph = DNA - when "rna" - alph = RNA - when "protein" - alph = PROTEIN + case type + when :dna then alph = DNA + when :rna then alph = RNA + when :protein then alph = PROTEIN else raise SeqError, "Unknown sequence type: #{type}" end seq_new = Array.new(length) { alph[rand(alph.size)] }.join("") self.seq = seq_new - self.type = type.downcase + self.type = type seq_new end @@ -420,6 +428,45 @@ class Seq self end + # Method to add two Seq objects. + def +(entry) + new_entry = Seq.new() + new_entry.seq = self.seq + entry.seq + new_entry.type = self.type if self.type == entry.type + new_entry.qual = self.qual + entry.qual if self.qual and entry.qual + new_entry + end + + # Method to concatenate sequence entries. + def <<(entry) + raise SeqError, "sequences of different types" unless self.type == entry.type + raise SeqError, "qual is missing in one entry" unless self.qual.class == entry.qual.class + + self.seq << entry.seq + self.qual << entry.qual unless entry.qual.nil? + + self + end + + # Index method for Seq objects. + def [](*args) + entry = Seq.new + entry.seq_name = self.seq_name + entry.seq = self.seq[*args] + entry.type = self.type + entry.qual = self.qual[*args] unless self.qual.nil? + + entry + end + + # Index assignment method for Seq objects. + def []=(*args, entry) + self.seq[*args] = entry.seq[*args] + self.qual[*args] = entry.qual[*args] unless self.qual.nil? + + self + end + # Method that returns a subsequence of from a given start position # and of a given length. def subseq(start, length = self.length - start) @@ -437,7 +484,9 @@ class Seq qual = self.qual[start .. stop] unless self.qual.nil? end - Seq.new(self.seq_name, seq, self.type, qual) # TODO changed self.seq_name.dup to self.seq_name -> consequence? + seq_name = self.seq_name.nil? ? nil : self.seq_name.dup + + Seq.new(seq_name, seq, self.type, qual) end # Method that replaces a sequence with a subsequence from a given start position @@ -478,23 +527,6 @@ class Seq comp end - # Method that returns the length of the longest homopolymeric stretch - # found in a sequence. - def homopol_max(min = 1) - return 0 if self.seq.nil? or self.seq.empty? - - found = false - - self.seq.upcase.scan(/A{#{min},}|T{#{min},}|G{#{min},}|C{#{min},}|N{#{min},}/) do |match| - found = true - min = match.size > min ? match.size : min - end - - return 0 unless found - - min - end - # Method that returns the percentage of hard masked residues # or N's in a sequence. def hard_mask @@ -550,61 +582,51 @@ class Seq def qual_base33? self.qual.match(/[!-:]/) ? true : false end - - # Method that determines if a quality score string can be - # absolutely identified as base 64. + + # Method that determines if a quality score string may be base 64. def qual_base64? self.qual.match(/[K-h]/) ? true : false end - # Method to determine if a quality score is valid. + # Method to determine if a quality score is valid accepting only 0-40 range. def qual_valid?(encoding) raise SeqError, "Missing qual" if self.qual.nil? - case encoding.downcase - when "sanger" then return true if self.qual.match(/^[!-~]*$/) - when "454" then return true if self.qual.match(/^[@-~]*$/) - when "solexa" then return true if self.qual.match(/^[;-~]*$/) - when "illumina13" then return true if self.qual.match(/^[@-~]*$/) - when "illumina15" then return true if self.qual.match(/^[@-~]*$/) - when "illumina18" then return true if self.qual.match(/^[!-~]*$/) + case encoding + when :base_33 then return true if self.qual.match(/^[!-I]*$/) + when :base_64 then return true if self.qual.match(/^[@-h]*$/) else raise SeqError, "unknown quality score encoding: #{encoding}" end false end - # Method to convert quality scores inbetween formats. - # Sanger base 33, range 0-40 - # 454 base 64, range 0-40 - # Solexa base 64, range -5-40 - # Illumina13 base 64, range 0-40 - # Illumina15 base 64, range 0-40 - # Illumina18 base 33, range 0-41 - def convert_scores!(from, to) - unless from == to - na_qual = NArray.to_na(self.qual, "byte") + # Method to coerce quality scores to be within the 0-40 range. + def qual_coerce!(encoding) + raise SeqError, "Missing qual" if self.qual.nil? - case from.downcase - when "sanger" then na_qual -= 33 - when "454" then na_qual -= 64 - when "solexa" then na_qual -= 64 - when "illumina13" then na_qual -= 64 - when "illumina15" then na_qual -= 64 - when "illumina18" then na_qual -= 33 - else raise SeqError, "unknown quality score encoding: #{from}" - end + case encoding + when :base_33 then self.qual.tr!("[J-~]", "I") + when :base_64 then self.qual.tr!("[i-~]", "h") + else raise SeqError, "unknown quality score encoding: #{encoding}" + end - case to.downcase - when "sanger" then na_qual += 33 - when "454" then na_qual += 64 - when "solexa" then na_qual += 64 - when "illumina13" then na_qual += 64 - when "illumina15" then na_qual += 64 - when "illumina18" then na_qual += 33 - else raise SeqError, "unknown quality score encoding: #{to}" - end + self + end + + # Method to convert quality scores. + def qual_convert!(from, to) + raise SeqError, "unknown quality score encoding: #{from}" unless from == :base_33 or from == :base_64 + raise SeqError, "unknown quality score encoding: #{to}" unless to == :base_33 or to == :base_64 + if from == :base_33 and to == :base_64 + na_qual = NArray.to_na(self.qual, "byte") + na_qual += 64 - 33 + self.qual = na_qual.to_s + elsif from == :base_64 and to == :base_33 + self.qual.tr!("[;-?]", "@") # Handle negative Solexa values from -5 to -1 (set these to 0). + na_qual = NArray.to_na(self.qual, "byte") + na_qual -= 64 - 33 self.qual = na_qual.to_s end @@ -617,6 +639,7 @@ class Seq na_qual = NArray.to_na(self.qual, "byte") na_qual -= SCORE_BASE + na_qual.mean end