       end)
       |> Enum.sort_by(fn [c | _] -> c end)
       |> Enum.reverse()
-      |> hd
+      |> List.first()
 
     report = """
     Best Day Last Week:   #{day_output(best_day_last_week)}

    "#{String.pad_leading(to_string(count), 10, " ")} #{format(date)}"
  end

  defp format(date) do
    Timex.format!(date, "%a %m/%d", :strftime)
  end

      end)
      |> Enum.sort_by(fn [c | _] -> c end)
      |> Enum.reverse()
      |> List.first()

    previous_week_row =
      rows
      |> Enum.filter(fn [_, _, period] -> period == "week" end)
      |> Enum.reverse()
      |> List.first()

    best_day_previous_week =
      rows
