Averages/Root mean square: Difference between revisions

Content added Content deleted

Inline

@@ Line 393: / Line 393: @@
 <lang elixir>
 defmodule RC do
-  def root_mean_square(list) do
+  def root_mean_square(enum) do
+    enum
-    :math.sqrt(Enum.reduce(list, 0, &(&2 + &1 * &1)) / Enum.count(list))
+    |> square
-  end
+    |> mean
+    |> :math.sqrt
+  end
+  defp mean(enum), do: Enum.sum(enum) / Enum.count(enum)
+  defp square(enum), do: (for x <- enum, do: x * x)
 end