Mathematica Notebook Mathematica 3 Table fn f nf
¡ 启动Mathematica后, 屏幕上出现称为Notebook 的Mathematica 系统集成界面:
• 命令形式 3: Table[ 通项公式f,{循环次数n}], f为常数 功能:产生n个f的一个表{ f ,f,f,……,f } 例如:建立产生 8个 2一个表{2,2,2,2,2} 命令:In[10]: = Table[2, {8} Out[10]= {2,2,2,2,2} • 命令形式 4: Table[ 通项公式f(i , j),{{i ,imin,imax}, {j ,jmin,jmax}] 功能:产生一个二维表 { {f(imin, jmin) ,f(imin, jmin +1),f(imin, jmin +2), ……, f(imin, jmin +m)}, {f(imin+1, jmin) ,f(imin+1, jmin +1), f(imin+1, jmin +2), ……, f(imin+1 , jmin +m)}, …… {f(imin+n, jmin) ,f(imin+n, jmin +1),f(imin+n, jmin +2), ……,f(imin +n, jmin +m)} 其中: imax – 1 imin + n imax , jmax – 1 jmin +m jmax 例如 :In[11]: = Table[i-j, {i, 1 , 6}, {j, 1 , 2}] Out[11]= {{0, -1}, {1, 0}, {2, 1}, {3, 2}, {4, 3}, {5, 4}}
举例说明: In[31]: = Abs[ -4] Out[31]= 4 In[32]: = Round[1. 1] Out[32]= 1 In[33]: = Round[1. 9] Out[33]= 2 In[34]: = Floor[2. 1] Out[34]= 2 In[35]: = Ceiling [2. 1] Out[35]= 3 In[36]: = Sign[22] Out[36]= 1 In[37]: = Sign[-2222] Out[37]= -1
举例说明: In[31]: = Exp[5] Out[31]= e 5 In[32]: = Log[1] Out[32]= 0 In[33]: = Log[10, 100] Out[33]= 2 In[34]: = Sin[0] Out[34]= 0 In[35]: = Cos[0] Out[35]= 1 In[36]= Tan[Pi] Out[36]= 0 In[37]= Cot[Pi/2] Out[37]= 0 In[38]= Arc. Sin [1] Out[38]= Pi/2 In[39]= Arc. Tan [1] Out[39]= Pi/4
举例说明: In[31]: = Max[9, 5, -4, 3. 1] Out[31]= 9 In[32]: = Min[9, 5, -4, 3. 1] Out[32]= -4 在 9, 5, -4, 3. 1这四个数中,最大的是 9,最小的是-4 In[33]: = Max[{2, 5, -4, {-3. 1, 8}, 3] Out[33]= 8 In[34]: = Mod[26, 3] Out[34]= 2 In[35]: = Quotient[26, 3] Out[35]= 8 26除以 3,得 8,余数为 2,Mod和Quotient功能不同 In[36]=Re[3+4 i] Out[36]= 3 求3+4 i的实部,求虚部用Im In[37]= Sqrt[4] Out[37]= 2
举例: (i)产生小于等于5的一个非负随机实数。 命令: In[39]: = Random[Real, 5] Out[39]= 4. 72088 (ii)产生闭区间[0, 1]内的6个随机实数的一个表。 命令: In[40]: = Table[Random[], {6}] Out[40]= {0. 836874, 0. 347154, 0. 150818, 0. 373472, 0. 689255, 0. 546614} (iii)产生闭区间[-2, 10]内的5个随机实数的一个表。 命令: In[41]: = Table[Random[Real, {-2, 10}], {5}] Out[41]= {8. 873, -0. 643032, 2. 00279, 4. 83199, 4. 47409} (iv)产生 1到 8之间的10个随机整数的一个表。 命令: In[42]: = Table[ Random[Integer, {1, 8}], {10} ] Out[42]= {3, 8, 1, 5, 4, 5, 6, 8, 6, 5} (v)产生单位正方形内的5个随机复数的一个表。 命令: In[43]: = Table[Random[Complex]], {5}] Out[43]= {0. 537111+0. 917944 I, 0. 944971+ 0. 283356 I, 0. 289054 + 0. 937503 I}
举例: In[56]: = Function[x, Cos[x]^2 -Sin[x]] Out[56]= Function[x, Cos[x]2 - Sin[x]] (函数已建立) In[57]: = %[3] (*计算x=3时的函数值f(3) Out[57]= Cos[3]^2 - Sin[3] (*输出函数值Cos[3]^2 - Sin[3]) In[58]: = s = Function[{x, y}, x - y] Out[58]= Function[{x, y}, x - y] In[59]: =s[19, 10] Out[59]=9 In[60]: =(# + 1)&[x] Out[60]: =1+x In[61]: = (#1 - #2)&[a, b] Out[61]= a - b In[62]: = #1^#2&[2,3] Out[62]: =8
- Slides: 61