谁会用 mathematica 5.2 ?

dunwan2tellu

我最近install 了 mathematica 5.2 , 不过不大会用，这里有那位是 mathematica 高手，请指教！

问题1）
好比要 expand ( ab + ac + bc)^3 , 我输入

Expand[(ab+ac+bc)^3] ,不过他出来东西得却是好像 ababac 之类的，并不能group成 a^3b^2c .请问有谁会 fix 这种 error ?

fadeev_popov

如果 ab means a times b 的话，那么，a 和 b 之间要有空格：

Expand[(a b + a c + b c)^3]

dunwan2tellu

原帖由 fadeev_popov 于 10-5-2006 12:18 AM 发表
如果 ab means a times b 的话，那么，a 和 b 之间要有空格：

Expand[(a b + a c + b c)^3]

非常感谢您！

问题2）
如何 plot 一个 3 variable 的 graph .
i.e f(x,y,z) = x^2 + y^2 + z^2  , x,y,z >= 0

还有的就是，如何 define the range from 0 to infty ? 我尝试

用 {x , 0 , oo }，不过行不通....

fadeev_popov

如何 plot 一个 3 variable 的 graph.
i.e f(x,y,z) = x^2 + y^2 + z^2  , x,y,z >= 0

大概不能，三个 input variables, x, y, z 已经用掉了三个坐标，那么 output, f(x,y,x) 的数值该放去哪呢？

如何 define the range from 0 to infty ?

e.g., Sum[1/n^2, {n, 1, Infinity}]

dunwan2tellu

原帖由 fadeev_popov 于 10-5-2006 08:03 PM 发表

大概不能，三个 input variables, x, y, z 已经用掉了三个坐标，那么 output, f(x,y,x) 的数值该放去哪呢？

原来如此！那么有没有方法把 f(x,y,z) 的 function 当 z = 1,2,3 的case 分别在同一个 graph 画出来呢？或是 什么 command 可以使到他自己 plot z = 1,2,3 时的 function (3个graph 非开来也不用紧）。

e.g., Sum[1/n^2, {n, 1, Infinity}]

难怪 oo 的符号不管用...

dunwan2tellu

问题 3)

我输入 f[a_ ,b_]:= Sqrt[a b]

当我要找 f[x^2 , y^2] 时，他的 output 是 Sqrt[x^2 y^2] .
请问我应该如何做才能让他的 output 是 xy 呢？（假设 x,y>0)

fadeev_popov

我输入 f[a_ ,b_]:= Sqrt[a b]
当我要找 f[x^2 , y^2] 时，他的 output 是 Sqrt[x^2 y^2] .
请问我应该如何做才能让他的 output 是 xy 呢？(假设 x>0,y>0)

f[a_, b_] := Sqrt[a b]
Assuming[{x > 0, y > 0}, Simplify[f[x^2, y^2]]]

dunwan2tellu

原帖由 fadeev_popov 于 13-5-2006 01:57 PM 发表

f[a_, b_] := Sqrt[a b]
Assuming[{x > 0, y > 0}, Simplify[f[x^2, y^2]]]

原来是要那个 “Assuming" 的东西！谢谢！

还有关于 derivative 的 command . 如果要找 f(x) 的 n 次 derivative , 有没有其他方法除了输入 f'''''''(x) 之类的？因为这样的 command 很费时，且容易出错。

fadeev_popov

你在 notebook 里 key in "D", 然后 highlight 它，再按 F1，就会看到以下的提示：
D[f, {x, n}] gives the multiple derivative d^nf/dx^n.

E.g., D[1/x, {x, 9}] or Table[D[1/x, {x,i}], {i, 1, 9, 2}]

dunwan2tellu

原帖由 fadeev_popov 于 13-5-2006 07:06 PM 发表
你在 notebook 里 key in "D", 然后 highlight 它，再按 F1，就会看到以下的提示：
D[f, {x, n}] gives the multiple derivative d^nf/dx^n.

E.g., D[1/x, {x, 9}] or Table[D[1/x, {x,i}], {i, 1, ...

非常感谢您 fadeev_popov . 你所指的 notebook 是否是 “Master Index" ?

还有一个关于 Assuming 的问题。我想要 plot integer function 的 graph 的话，我用 Assuming[n E Integer ,Plot[f[n_]:=Sqrt[n],{n,1,10}]]但是却不能。。

fadeev_popov

Notebook 就是每次打开 Mathematica 后，可以键入 commands 和 text 的地方。它的 file extension 是 ".nb".

我对 Mathematica 不熟，不能从它的基本运作来解释。但我想，ListPlot 可能才是你需要的 command:

listValues = Table[Sqrt[n], {n, 1, 10}]
ListPlot[listValues]

如果要把所有的点连接起来：
ListPlot[listValues, PlotJoined -> True]

dunwan2tellu

为何当我要找　recurrence relation 的解时

RSolve[{a[n+2]-4a[n+1]+3a[n]==100,a[0]==100,a[1]==200},a[n],n]

却行不通？我检查了　ｎｏｔｅｂｏｏｋ，写的方法也差不多，就是不行？为何？！

bomber27

我copy你写的equation，放在mathematica里没问题啊

[ 本帖最后由 bomber27 于 25-5-2006 01:44 PM 编辑 ]

dunwan2tellu

原帖由 bomber27 于 25-5-2006 01:39 PM 发表
我copy你写的equation，放在mathematica里没问题啊

我刚刚又试了一次，发现到真的行了.....奇怪....

难道当天 mathematica 失灵？

bomber27

mathematica还真好玩，dunwan2tellu，等你精通mathematica后，记得开个mathematica教学的帖，哈哈

dunwan2tellu

原帖由 bomber27 于 25-5-2006 01:57 PM 发表
mathematica还真好玩，dunwan2tellu，等你精通mathematica后，记得开个mathematica教学的帖，哈哈

bomber27 兄，我目前要应付 STPM 恐怕无法细心去研究 mathematica .我通常是用来做 integration/differential equation 之类的。再来就是 plot 些函数图形来研究研究。

我知道 mathematica 里面有很多 package ,什么 number theory , statistic , inequality 之类的 package .可惜我电脑知识没那么好，只会用电脑上网 ,所以摸索起来有些慢。

对了 bomber27 兄，看来你也有不少用 mathematica 的经验吧？你大部分是用来解题目？plot graph 还是其它？分享来听听。。可能从中可以学到几招。

bomber27

原帖由 dunwan2tellu 于 25-5-2006 02:16 PM 发表


bomber27 兄，我目前要应付 STPM 恐怕无法细心去研究 mathematica .我通常是用来做 integration/differential equation 之类的。再来就是 plot 些函数图形来研究研究。

我知道 mathematica 里面有很多 pac ...

不瞒你说，其实我是看了你这帖才知道有这样的program的
现在放假了，可以慢慢摸索了，hehe..

dunwan2tellu

原帖由 bomber27 于 25-5-2006 02:27 PM 发表

不瞒你说，其实我是看了你这帖才知道有这样的program的
现在放假了，可以慢慢摸索了，hehe..

原来如此。那么你有用过　ｍａｐｌｅ　或是　ｍａｔｈｌａｂ　吗？如果有的话，比较起来你认为哪一个比较好用？

我喜欢ｍａｔｈｅｍａｔｉｃａ　的地方在我可以　ｅｘｐａｎｄ　一些很长的　algebric expression .

i.e (x+2y^2+5z+6xy)^5 之类的．以前每次要展开他们就头痛，因为太多ｔｅｒｍ　容易出错。现在有这个由不一样了。

还有，用来检查ｂｉｎｏｍｉａｌ　ｅｘｐａｎｓｉｏｎ　或　ｐｏｗｅｒ　ｓｅｒｉｅｓ　也不错。

大部分都遇到这类ｅｘｐａｎｄ东西时，“人脑”费力，电脑最省力的地方，莫过于此！

bomber27

原帖由 dunwan2tellu 于 26-5-2006 05:00 PM 发表


原来如此。那么你有用过　ｍａｐｌｅ　或是　ｍａｔｈｌａｂ　吗？如果有的话，比较起来你认为哪一个比较好用？

我喜欢ｍａｔｈｅｍａｔｉｃａ　的地方在我可以　ｅｘｐａｎｄ　一些很长的　algebric expr ...

不好意思，忘了回你。
maple 和 matlab都没用过，但是过后会学matlab，课程上的需要。

是咯，mathematica真好用，expand起来真方便，还能plot 3D的graph

lavendar_o5

请问你如何得到Mathematica 5.2呢 ? 我这里只有Mathematica 4.0，旧版本。。