2014-07-15から1日間の記事一覧

4clojure #67 Prime Numbers

4clojure #67 Prime Numbers 最初のx個の素数を返す関数を作る。 (= (__ 2) [2 3]) (= (__ 5) [2 3 5 7 11]) (= (last (__ 100)) 541) はじめは、reduceのClojureDocをみて、素数列をつくろうとしましたが、 うまくいかなかったので、prime?を作ってみました…

4clojure #66 Greatest Common Divisor

4clojure #66 Greatest Common Divisor 最大公約数を求める関数を作る。 (= (__ 2 4) 2) (= (__ 10 5) 5) (= (__ 5 7) 1) (= (__ 1023 858) 33) a、bの最大公約数とは、aでもbでも割り切れる数のうちの最大値だから ((fn my-gcd [a b] (let [m (max a b)] (l…