JSXGraph

hbghlyj

用Mathematica画一个简单的参数曲线动图

1. gif = Table[
   
2.    ParametricPlot[{Cos[5 t - 9 Degree a /7], Cos[7 t]}, {t, 0, 2 Pi},
   
3.     Axes -> False, PlotStyle -> Red], {a, 0, 40}];
   
4. Export["sin.gif", gif, "DisplayDurations" -> 0.1, ImageSize->{80,80}];
   
5. SystemOpen["sin.gif"]

复制代码

但是我想弄一个交互图,就像Mathematica里面的Manipulate那种...
一种办法是安装Geogebra Applet,另一种是使用CindyJS,经过搜索,又发现可以使用JSXGraph
https://www.math.unipd.it/~erb/Lissajous.html