用mathematica画麦克斯韦速率分部 图我用mathematica 画的,程序如下,但是画不出,求大神看看哪里出错了k := 1.38*10^-23;m := 28;T := 100;Plot[{4*Pi*(m/(2*Pi*k*T))^(3/2)*E^(-((m*x^2)/(2*k*T)))*x^2}, {x, 0, 1000}]系统提

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/12 17:29:55
用mathematica画麦克斯韦速率分部 图我用mathematica 画的,程序如下,但是画不出,求大神看看哪里出错了k := 1.38*10^-23;m := 28;T := 100;Plot[{4*Pi*(m/(2*Pi*k*T))^(3/2)*E^(-((m*x^2)/(2*k*T)))*x^2}, {x, 0,   1000}]系统提

用mathematica画麦克斯韦速率分部 图我用mathematica 画的,程序如下,但是画不出,求大神看看哪里出错了k := 1.38*10^-23;m := 28;T := 100;Plot[{4*Pi*(m/(2*Pi*k*T))^(3/2)*E^(-((m*x^2)/(2*k*T)))*x^2}, {x, 0, 1000}]系统提
用mathematica画麦克斯韦速率分部 图

我用mathematica 画的,程序如下,但是画不出,求大神看看哪里出错了

k := 1.38*10^-23;
m := 28;
T := 100;
Plot[{4*Pi*(m/(2*Pi*k*T))^(3/2)*E^(-((m*x^2)/(2*k*T)))*x^2}, {x, 0,
  1000}]

系统提示,k,也就是玻尔兹曼常数小于系统最小值,无法进行计算与画图,求救=.=

用mathematica画麦克斯韦速率分部 图我用mathematica 画的,程序如下,但是画不出,求大神看看哪里出错了k := 1.38*10^-23;m := 28;T := 100;Plot[{4*Pi*(m/(2*Pi*k*T))^(3/2)*E^(-((m*x^2)/(2*k*T)))*x^2}, {x, 0, 1000}]系统提
出错的原因是,-((m*x^2)/(2*k*T))的值太小了,E的-((m*x^2)/(2*k*T))次方超出了系统所能表达的最小的数,可以输入$MinNumber并shift+enter,查看系统所允许的最小的数字.你确定你给的参数没有问题吗?k这么小?