4clj; solve problem 063 - group-by