完整的 Wolfram 语言和笔记本体验
原有的技术计算环境
复杂系统的多领域建模与仿真
更多移动应用程序
我们帮助客户充分发挥计算知识与智能的潜力。
Wolfram 咨询
更多 Wolfram 解决方案
更多教育解决方案
计算机、科学、生活等方面的课程
学习、解决问题、分享想法。
来自 Wolfram 的新闻、观点和见解
资源
WolframConsulting.com
B 样条曲线支持所有可能的纽结配置组合.
SeedRandom[111];pts = {{0, 0}, {1, 1}, {2, -1}, {3, 0}, {4, -2}, {5, 1}}; GraphicsGrid[Partition[Table[With[{knots = Sort[RandomInteger[10, 10]]}, Graphics[{Green, Line[pts], Red, Point[pts], Thick, Orange, BSplineCurve[pts, SplineKnots -> knots]}, PlotRange -> {{0, 5}, {-2, 2}}, PlotRangePadding -> Scaled[.04], PlotLabel -> Style[knots, 9]]], {9}], 3], Frame -> All, ImageSize -> {500, 500}]