September 2017 Update
This commit is contained in:
parent
bba7bfd280
commit
ba8067c3b7
14570 changed files with 153136 additions and 63871 deletions
|
|
@ -1,7 +1,5 @@
|
|||
(use '[clojure.contrib.math :only (sqrt)])
|
||||
|
||||
(defn rms [xs]
|
||||
(sqrt (/ (reduce + (map #(* % %) xs))
|
||||
(Math/sqrt (/ (reduce + (map #(* % %) xs))
|
||||
(count xs))))
|
||||
|
||||
(println (rms (range 1 11)))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue