Task

Write a program to find the sum of squares of a numeric vector.

The program should work on a zero-length vector (with an answer of   0).



Related task

   Mean


(defn sum-of-squares [v]
  (reduce #(+ %1 (* %2 %2)) 0 v))