rosalind-dna-counter

dna_counter.ex

defmodule DnaCounter do

  def main(string) do
    dna_list =
      string
      |> String.codepoints
    letters_to_count = get_letters_to_count(dna_list)
    count_occurences(dna_list, letters_to_count)
  end

  def get_letters_to_count(dna_list) do
    dna_list
    |> Enum.sort
    |> Enum.dedup
  end

  def count_occurences(_, []) do
    IO.puts "Finished"
  end

  def count_occurences(dna_list, letters_to_count) do
    [head | tail] = letters_to_count
    IO.puts Enum.count(dna_list, fn(x) -> x == head end)
    count_occurences(dna_list, tail)
  end
end