自定义博客皮肤VIP专享

*博客头图：

点击选择上传的图片

格式为PNG、JPG，宽度*高度大于1920*100像素，不超过2MB，主视觉建议放在右侧，请参照线上博客头图

请上传大于1920*100像素的图片！

博客底图：

点击选择上传的图片

图片格式为PNG、JPG，不超过1MB，可上下左右平铺至整个背景

栏目图：

点击选择上传的图片

图片格式为PNG、JPG，图片宽度*高度为300*38像素，不超过0.5MB

主标题颜色：

RGB颜色，例如：#AFAFAF

Hover：

RGB颜色，例如：#AFAFAF

副标题颜色：

RGB颜色，例如：#AFAFAF

预览取消提交

自定义博客皮肤

Quant19861127的专栏

博客等级

码龄11年

关注

私信

Mathematica描绘滚球某个点的运动轨迹（摆线）
m0_63640824: 应该修改为这样： Export["RolliingBall.gif", Table[Show[{ParametricPlot[{t - Sin[t], 1 - Cos[t]}, {t, 0.01, t1}, PlotStyle -> {Thick, Blue}], Graphics[{Thick, Circle[{t1, 1}, 1]}], Graphics[{Red, Disk[{t1 - Sin[t1], 1 - Cos[t1]}, 0.1]}]}, PlotRange -> {{0, 2*2*Pi}, {0, 2}}], {t1, 0, 2*2*Pi, 1.0/25}]]
Mathematica描绘滚球某个点的运动轨迹（摆线）
donglinliangster: 直接删掉，另外，轨迹曲线ParametricPlot中{t,0.01,t}有干扰，两个t得异名区分开来
自己实现FFT算法
VIPBOY1122: 那二维的快速傅里叶要怎么用啊，比如我要对一张图片进行傅里叶变换，不能用库函数的
Mathematica描绘滚球某个点的运动轨迹（摆线）
土老师2050: PlotRange -> {{0, 2*2*Pi}, {0, 2}}], {t, 0, 2*2*Pi, 1.0/25}]]这句有问题
Mathematica描绘滚球某个点的运动轨迹（摆线）
土老师2050: 这无法识别，12.0版本

关注

关注数：文章数：0 文章阅读量：0 文章收藏量：0

Topics include Matlab, Mathematica, C/C++, Excel/VBA, Python, R, Machine Learning, Data Mining, DSP, Econometrics, Statistics, Finance, Mathematics.

展开

专栏收录文章

空空如也