5 lines
108 B
Clojure
5 lines
108 B
Clojure
(defn rms [xs]
|
|
(Math/sqrt (/ (reduce + (map #(* % %) xs))
|
|
(count xs))))
|
|
|
|
(println (rms (range 1 11)))
|