Quant19861127的专栏

圆球上的某个点的运动轨迹可以分解成两个部分，第一部分为圆球整体的平移运动，第二部分为圆球原地的滚动。不难推出圆滚线的方程为x=t-sin(t), y=1-cos(t) （假设圆球的平移速度为1m/s,如果速度为v,则两个方程右侧都乘以v即可)。       Mathematica代码为：      Export["RolliingBall.gif", Table[Show[{Param

有一个笑话：青年问禅师：“大师，我很爱我的女朋友，她也有很多优点，但是总有几个缺点让我非常讨厌，有什么什么方法能让她改变？” 禅师浅笑，答：“方法很简单，不过若想我教你，你需先下山为我找一张只有正面没有背面的纸回来。” 青年略一沉吟，掏出一个麦比乌斯环。用Mathematica画出来：

无意中学到了生成二维码的技能。用Mathematica可以生成二维码，方法如下图所示：测试过，扫描以后，可以进入我们公司的网站。

BaseForm函数的功能是将十进制数转换为其他进制数，但是它能够转换的进制范围为2到36(10个阿拉伯数字+26个英文字母表示数字），如果英文字母区分大小写，可以将进制范围扩大到62(10+26*2).Mathematica代码实现为：baseform[num_, base_] :=  With[{set =     Join[CharacterRange["0", "9