W1/4 Breaking Records completed in elixir

Author: jamiecurle

w1/breaking_records.ex

@@ -21,9 +21,38 @@ defmodule HackerRank.W1.BreakingRecords do
       iex> breaking_records([3, 4, 21, 36, 10, 28, 35, 5, 24, 42])
       [4, 0]
   """
-  @spec breaking_records([integer()]) :: [integer()]
+  @spec challenge([integer()]) :: [integer()]
   def challenge(scores) do
-    [1,2]
+    # calculate the minimum and maximum records
+    process_scores(scores, [], [], [])
   end
 
+  def process_scores([current | rest], processed, min_b, max_b) do
+
+    # get the max value in processed, if there is no value
+    # add the current to procesed and recurse.
+    mx = Enum.max(processed, fn -> :nil end)
+    if mx == :nil do
+      process_scores(rest, [current | processed], min_b, max_b)
+    end
+
+    # get the minimum value in processed, and fallback to zero
+    mn = Enum.min(processed, fn -> 0 end)
+
+    # now process everything
+    cond do
+      current > mx ->
+        process_scores(rest, [current| processed] , min_b, [current| max_b])
+
+      current < mn ->
+        process_scores(rest, [current| processed], [ current | min_b] , max_b)
+
+      true ->
+        process_scores(rest, [current | processed] , min_b, max_b)
+    end
+  end
+
+  def process_scores([], _processed, min_b, max_b) do
+    [length(max_b), length(min_b)]
+  end
 end

w1/breaking_records_test.exs

@@ -8,7 +8,6 @@ defmodule HackerRank.W1.BreakingRecordsTests do
   test "run the tests" do
     Helper.test_all(@pattern, &parse_args/1, &parse_expected/1 )
     |> Enum.each(fn [args, expected] ->
-      IO.inspect(args)
       assert BreakingRecords.challenge(args) == expected
     end)
   end
@@ -17,6 +16,8 @@ defmodule HackerRank.W1.BreakingRecordsTests do
     # now turn in to Integers
     raw |> String.split(" ") |> Enum.map(&String.to_integer/1)
   end
-  def parse_expected([raw]), do: raw
+  def parse_expected([raw]) do
+    raw |> String.split(" ") |> Enum.map(&String.to_integer/1)
+  end
 
 end