fornext1119 https://blog.hatena.ne.jp/fornext1119/ ONLY DO WHAT ONLY YOU CAN DO https://fornext1119.hatenablog.com/ Clojure 数値計算 連分数展開 π πの求め方 こう書いてもおｋ ;自作の逆正接関数 (defn myAtan [x x2 n t] (def m (quot n 2)) (def denom (/ (* (* m m) x2) (+ n t))) (def nume (- n 2)) (if (<= nume 1) (/ x (+ 1 denom)) (myAtan x x2 nume denom))) (doseq [degree (map #(- (* % 15) 45) (range 0 7))] (do (def radian (/ (* degree (. Math PI)) 180.0)) (def x2 (* r… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Ffornext1119.hatenablog.com%2Fentry%2F20131130%2Fp3" title=" Clojure で 連分数展開を使って π を求める - ONLY DO WHAT ONLY YOU CAN DO" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> http://cdn-ak.f.st-hatena.com/images/fotolife/f/fornext1119/20131128/20131128155854.png Hatena Blog https://hatena.blog 2013-11-30 00:00:00 rich https://fornext1119.hatenablog.com/entry/20131130/p3 1.0 100%