如何在Mathematica上画此函数图像Sum[0.5^n*sin (3^n*x),{n = 0,Infinity}]

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/03 08:50:58
如何在Mathematica上画此函数图像Sum[0.5^n*sin (3^n*x),{n = 0,Infinity}]

如何在Mathematica上画此函数图像Sum[0.5^n*sin (3^n*x),{n = 0,Infinity}]
如何在Mathematica上画此函数图像
Sum[0.5^n*sin (3^n*x),{n = 0,Infinity}]

如何在Mathematica上画此函数图像Sum[0.5^n*sin (3^n*x),{n = 0,Infinity}]
不好意思刚才看错题了,这个图形很有意思.
Plot[Sum[0.5^n*Sin[3^n*x],{n,0,60}],{x,1,20}]
Plot[Sum[0.5^n*Sin[3^n*x],{n,0,120}],{x,1,12}]
(Infinity的话计算太慢了,我只取了60,绝对误差不到0.0000000000000001)

又是Weierstrass函数

hpfdf正确