Qurak

Generate Bezier curves of any degree

示例 1 步,在同一个会话中按顺序运行。每一步都在引擎上执行过,下面的输出就是它实际产生的。

第 1 步
GraphicsGrid[Partition[Table[With[{pts = Table[i{Cos[8 / n i], Sin[8 / n i]}, {i, n}]}, Graphics[{Green, Line[pts], Red, Point[pts], Thick, Blue, BezierCurve[pts, SplineDegree -> (n - 1)]}, PlotLabel -> Row[{"degree ", n - 1}]]], {n, 4, 16}], 4], Frame -> All, ImageSize -> {500, 500}]
输出
-Graphics-

用到的函数

相关操作示例

全部操作示例 · 函数参考 · 从 MCP 客户端使用