我正在学习一些 Clojure,我正在使用 Quil。我想知道如何将 for 循环转换为 Clojure:
这就是我在 Java 或类似语言中的做法:
for ( int i = 0; i < numSides; i++ ) {
float posX = cos( theta * i );
float posY = sin( theta * i );
ellipse( posX, posY, polySize, polySize );
}
我的 Clojure 尝试:
(let [theta (/ PI num-sides)
angle (range 0 num-sides)
pos-x (cos (* theta angle))
pos-y (sin (* theta angle))]
(dorun (map #(ellipse % % % %) pos-x pos-y poly-size poly-size)))