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"]

Copy the Code

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