Exercism: "Difference Of Squares in Clojure"

I solved the Difference Of Squares problem in Clojure.

This exercise was very easy.

I played with partial and the thread last macro (->>) to try to make the solution more readable:

	(ns difference-of-squares)
	(def ^:private naturals
	(drop 1 (range)))
	(def ^:private sum
	(partial reduce +))
	(defn- square [n]
	(* n n))
	(def ^:private square-all
	(partial map square))
	(defn square-of-sums [n]
	(->> (take n naturals)
	sum
	square))
	(defn sum-of-squares [n]
	(->> (take n naturals)
	square-all
	sum))
	(defn difference [n]
	(- (square-of-sums n)
	(sum-of-squares n)))

view raw difference_of_squares.clj hosted with ❤ by GitHub

It turns out that I had done this exercise before.
You can see that version in Euler Project: Problem 6 in Clojure

You can nitpick my solution here and/or see all the exercises I've done so far in this repository.