Bridget Riley风格的光学艺术
几何画板及绘图内容加载中,请稍等……
本范例通过几何变换和三角函数展示了Bridget Riley风格的光学艺术效果。核心数学概念包括旋转、椭圆、正弦函数和向量。通过使用Circle, Dilate, Radius, Distance, Max, Sequence, Point等命令,可以构造出具有动态效果的几何图形。适合高中数学教学,特别是解析几何和三角函数的教学。
GeoGebra 命令及参数
Circle(A, A1) → dDilate(PolyLine[Corner[1], Corner[2], Corner[3], Corner[4], Corner[1]], 0.95, A) → hRadius(d) → raDistance(B, A) → bDistance(C, A) → caDistance(C, B) → cbMax(ca + ra, cb + rb) → cCircle(B, rb) → eCircle(C, rc) → fSequence(Rotate[A1, (i * (180°) / n), A], i, 0, (2 * n) - 1) → l1Point(e) → B1Sequence(Rotate[B1, (i * (180°) / n), B], i, 0, (2 * n) - 1) → l3Point(f) → C1Sequence(Rotate[C1, (i * (180°) / n), C], i, 0, (2 * n) - 1) → l4Dilate(PolyLine[Corner[1], Corner[2], Corner[3], Corner[4], Corner[1]], 2, A) → gPoint(h) → DSequence(Intersect[Ray[Element[l4, i + 1], Rotate[D, (i * (180°) / n), A]], g], i, 0, (2 * n) - 1) → l5Sequence(Polygon[A, Element[l1, (2 * i) - 1], Element[l1, (2 * i)]], i, 1, n) → l2Sequence(Polygon[Element[l1, (2 * i) - 1], Element[l1, (2 * i)], Element[l3, (2 * i)], Element[l3, (2 * i) - 1]], i, 1, n) → l6Sequence(Polygon[Element[l4, (2 * i) - 1], Element[l4, (2 * i)], Element[l3, (2 * i)], Element[l3, (2 * i) - 1]], i, 1, n) → l7Sequence(Polygon[Element[l4, (2 * i) - 1], Element[l4, (2 * i)], Element[l5, (2 * i)], Element[l5, (2 * i) - 1]], i, 1, n) → l8