clojure - 使用 quil.core/ellipse 在 clojure 中绘制一个 8 模式

Question

我想画一个有八种图案的草图。现在我知道如何在逆时针和顺时针方向画圆。但我不知道如何将它们结合起来。

(defn draw-state [state]
   (let [x (* 150 (quil.core/cos angle))
         y (* 150 (quil.core/sin angle))]
      (quil.core/ellipse x y 100 100)
      (quil.core/ellipse y x 100 100)))

此函数将在相反方向绘制两个圆圈。但是如何画出带有 8 个图案的草图呢？

Answer 1

8 型曲线的极坐标方程 =

r^2 = Cos[2t] (Sec[t])^4

其中 r = 半径，t = 角度

你可以从这个开始。