方程是
y '=(1.17*^-8*((1-Coth((x+0.000026*y)/25795)^2)/25795+25795/(x+0.000026*y)^2)*0.19+(1.17*^-8*(Coth((x+0.000026*y)/25795)-25795/(x+0.000026*y))-y)/(-1*5983-0.000026*(1.17*^-8*(Coth((x+0.000026*y)/25795)-25795/(x+0.000026*y))-y)/(1-0.19)))/(1-0.19*1.17*^-8*((1-Coth((x+0.000026*y)/25795)^2)*0.000026/25795+25795/(x+0.000026*y)^2*0.000026))
求大神帮助啊,求程序呜呜~~~~(>_<)~~~~
图呢?……
Mathematica的函数作图问题
具体你可以参看Manipulate的说明文档。参考资料:http:\/\/reference.wolfram.com\/mathematica\/ref\/Manipulate.html?q=Manipulate&lang=en
mathematica 如何画图
首先打开mathematica,然后 文件--》 新建--》 笔记本,这样就完成了画图的基本工作。二维画图命令:Plot[f(x), {x,a, b}] 这里f(x)代表你要画的函数,a ,b代表所画图的上下线 Plot[Sin[x], {x,0, 2*Pi}]如果需要画虚线或者点线,可以用如下命令: Plot[Sin[x], {x, 0, ...
mathematica7作图问题,求助求助~
mathematica的空格表示乘法,你写 xy 中间没有空格,它认为这个是一个变量,而不是x和y相乘。另外,画隐函数曲线的ImplicitPlot,高版本都不用了,6.0以后的版本就是用ContourPlot3D这个函数了。
mathematica作图怎么图形出不来呀? 我键入 Plot[sin[x],{x,0,2Pi}...
把语句写在Kernel上就会出现你说的这种情况,虽然Kernel里可以进行一般的数字运算,但是画图是不行的,它不是正规的进行输入的地方 Mathematica里运算应是在"Notebook"里,俗称"笔记本",在那里边就可以绘制函数图像了
Mathematica作图报错,Table[]函数问题
原因在于函数 Plot 执行的是非标准计算,那个 Table 并没有生成列表,要想实现输出级数的各阶展开,必须改变 Table 语句的执行次序,也就是用 函数 Evaluate 将 Table 语句先于 Plot 执行。f[x_] = Sin[x];Export["e:\\\\sin(x).jpg",Show[Plot[f[x], {x, -2 \\[Pi], 2 \\[Pi]},Plo...
Mathematica作图求助 我想把一组数据的频率直方图和其正态分布曲线放在...
一般把2个图放一块用show函数就行。比如你这个 Show[ { t , w } ] 就Ok了,要是想输出文件就 p=Show[ { t,w } , ImageSize->{1024,768}]Export["c:\\\\picture.jpg", p]但是说来简单,做起来还是需要一点技巧的。比如你这2个图的坐标范围不一样,画一起就很难看,甚至看不见了;...
mathematica中作图时怎样在图像中直接显示两函数曲线交点并标明坐标...
如两个函数是x^2和2x,则:a = NSolve[y == x^2 && y == 2 x, {x, y}]; Plot[{x^2, 2 x}, {x, -1, 3},Epilog -> {Point[{x, y} \/. a],Table[Inset[({x, y} \/. a)[[i]], ({x, y} \/. a)[[i]]], {i, 1,Length[a]}]}]其输出效果如图。
mathematica 数学实验!! 问个简单的问题
mathematica 数学实验!! 问个简单的问题 悬赏分:100 - 离问题结束还有 14 天 23 小时 有三个作图的程序,如下:g[t_] := Plot[E^(-x^2\/2)\/Sqrt[2*Pi], {x, -t, t}];g[6]g[t_] := Plot[E^(-x^2\/8)\/(Sqrt[2*Pi]*2), {x, -t, t}];g[6]g[t_] := Plot[...
这个Mathematica三维图为什么画不出来
函数的自变量要使用方括号,圆括号在Mathematica里只表示运算的先后次序,对于你这种简单情形,简单地说,定义函数的时候,只有式子左边才要使用一条下划线(它实际上表示模式的匹配,具体你可以看看帮助);最那啥的是,你怎么定义函数全是用个大F啊?你该不会是觉得自变量不一样就不要紧了吧?形如“g_...
mathematica 10.1函数作图无图像
你这个函数用错了,应该用分段函数 f[_x] = Piecewise[{{-10\/x^2\/210*2370 + 10\/210*2370,0 <= x <= 1}, {1\/(210*2370)*(-5\/x^3\/3 + 25\/x^2\/2) - 625\/(6*210*2370), 1 <= x <= 5}}]Plot[f[x], {x, 0, 5}]