WOLFRAM

Wolfram 语言与系统参考资料中心

生成周期性B-样条曲线

使用选项可以显示周期性样条曲线.

Wolfram Language code: Manipulate[ Graphics[{Yellow, Blue, Thick, BSplineCurve[pts, SplineDegree -> 3, SplineClosed -> True], FaceForm[], EdgeForm[{Dashed, Red}], Polygon[pts]}, Frame -> True, PlotRange -> 5], {{pts, {{-2, 2}, {0, 1}, {-2, 0}, {0, -1}, {-2, -2}, {-4, -4}, {2, -4}, {4, 0}, {2, 4}, {-4, 4}}}, Locator, LocatorAutoCreate -> True}, "Alt+click to add points"]