大师作文网用mathematica画麦克斯韦速率分部 图
来源：学生作业帮 编辑：大师作文网作业帮 分类：数学作业 时间：2024/11/10 22:05:04
用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,也就是玻尔兹曼常数小于系统最小值,无法进行计算与画图,求救=.=
出错的原因是,-((m*x^2)/(2*k*T))的值太小了,E的-((m*x^2)/(2*k*T))次方超出了系统所能表达的最小的数,可以输入$MinNumber并shift+enter,查看系统所允许的最小的数字.你确定你给的参数没有问题吗?k这么小?
再问： K是玻尔兹曼常数啊。。。
再答： 解决方法有二
一，换一下单位（变向改变k的大小）
二，改变系统$MinNumber
再问： 怎么改变minnumber？
再答： 这是一个系统保护的常量，因此不建议修改，
但是可以使用Unprotect函数取消系统的保护，然后就可以修改了
我看到你在贴吧的求助帖了，貌似已经解决问题~~~是你单位弄错了
再问： K是玻尔兹曼常数啊。。。
再答： 解决方法有二
一，换一下单位（变向改变k的大小）
二，改变系统$MinNumber
再问： 怎么改变minnumber？
再答： 这是一个系统保护的常量，因此不建议修改，
但是可以使用Unprotect函数取消系统的保护，然后就可以修改了
我看到你在贴吧的求助帖了，貌似已经解决问题~~~是你单位弄错了