何谓“数学实验” 对数学进行折腾 连蒙带猜找规律 从问题出发,学生自己动手、动眼、动脑, 借助于计算机(成千上万次折腾),进行视 觉的、数值的、符号的折腾 尝试数学的探索、发现和应用
何谓“数学实验” 对数学进行折腾 连蒙带猜找规律 从问题出发,学生自己动手、动眼、动脑, 借助于计算机(成千上万次折腾),进行视 觉的、数值的、符号的折腾 尝试数学的探索、发现和应用
实验一:微积分基础 利用 Mathematica 1.1函数图象 画函数y=f(×)在区间[a,b] 上的图象的语句 plot[f[x],{×,a,b}]
实验一:微积分基础 利用Mathematica 1.1 函数图象: 画函数 y=f(x) 在区间[a,b] 上的图象的语句: Plot [ f [x], {x,a,b} ]
sin(x)及其Tyo逼近。 sin(Ⅹ)+Sin(3X)/3+ sin(1/×)在X=0附近的性状
sin(x)及其Tylor逼近。 sin(x)+sin(3x)/3+… sin(1/x)在x=0附近的性状
sin X+sin3x/3+.+sin nx/n U= a 66T=U 052 0· 0.5 20212/19
2021/2/19 sin x+sin3x/3+…+sin nx/n -6 -4 -2 2 4 6 -0.75 -0.5 -0.25 0.25 0.5 0.75 -6 -4 -2 2 4 6 -0.75 -0.5 -0.25 0.25 0.5 0.75 n = 9 199 = n
彩色图象 Plot[flX]x, a, b] Plotstyle - fRGBColor[1,0,0] RGBCO|or表示红、绿 蓝三色的比例
Plot[f[x],{x,a,b}, PlotStyle -> {RGBColor[1,0,0]} ] RGBColor 表示红、绿、 蓝三色的比例。 彩色图象
求根、求最小值 FindRoot[f[XxaJI 求f(x)在=a附近的根。 FindMinimumlflxrixal 求f(×)在x=a附近的最小 值点
FindRoot[f[x],{x,a}] 求f(x)在 x=a 附近的根。 FindMinimum[f[x],{x,a}] 求f(x)在 x=a 附近的最小 值点。 求根、求最小值
sin(1×)在x=0附近 1,0.0 0.5 20212/19
2021/2/19 Sin (1/x) 在 x=0 附近 -1 -0.5 0.5 1 -1 -0.5 0.5 1 -0.01 -0.005 0.005 0.01 -1 -0.5 0.5 @ 1 -1, 1D @-0.01, 0.01D