zehnpaard https://blog.hatena.ne.jp/zehnpaard/ Arantium Maestum https://zehnpaard.hatenablog.com/ Clojure Quil ビジュアル・プログラミング フラクタル 「関数型オブジェクト指向AIプログラミング」のフラクタルをscalaからclojureに書き直す続き。 フラクタルといえばマンデルブロかシェルピンスキー、というくらいにメジャーなフラクタルであるシェルピンスキー三角を描いてみる。 (defn szierpinski ([n length] (szierpinski n length 0 0)) ([n length x y] (let [len2 (/ length 2)] (if (= n 1) (let [x1 (+ x len2) x2 (- x len2) y1 (+ y (* len2 (Math/sqrt 3)))] (q/line… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fzehnpaard.hatenablog.com%2Fentry%2F2016%2F05%2F18%2F060116" title="Quilでフラクタル Szierpinski - Arantium Maestum" 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/z/zehnpaard/20160518/20160518055954.png Hatena Blog https://hatena.blog 2016-05-18 06:01:16 rich https://zehnpaard.hatenablog.com/entry/2016/05/18/060116 1.0 100%