附录BMathematica的基本应用.docVIP

附录B：Mathematica的基本应用 1. 什么是Mathematica Mathematica是美国Wolfram Research公司开发的通用科学计算软件，主要用途是科学研究与工程技术中的计算,这里介绍的是第6版（2009年更新为第7版）。由于它的功能十分强大，使用非常简便，现在已成为大学师生进行教学和科研的有力工具。Solve[x^4+x^3+3 x-5?0,x] 。 2) 既可以进行任意高精度的Integrate[x^4*Exp[2 x],x]。 3) 既可以进行抽象计算，又可以用图形、动画和声音等形式来具体表现，使人能够直观地把握住研究对象的特性。例如绘制函数图形：y = e(x/2 cos x, x ( [0, (]，只要运行下面的命令： Plot[Exp[x/2]*Cos[x],{x,0,Pi}]。 4) Mathematica把各种功能有机地结合在一个集成环境里，可以根据需要做不同的操作，给使用者带来极大的方便。 2. Mathematica的基本功能 2.1 基本运算及其对象 Mathematica的基本数值运算有加法、减法、乘法、除法和乘(开)方，分别用运算符“(”、“(”、“*”、“/”和“^”来表示（在不引起误解的情况下，乘号可以省略或用空格代替），例如2.4*3^2 ((5/(6+3))^(1/3)表示。小括号“（”和“）”作为表示运算优先顺序的符号，用于组合运算用于函数用于列表整数，有理数、实数和复数数值类型Pi表示圆周率(，E表示自然对数的底e = 2.17828…，I表示虚单位i ，Infinity表示无穷大(等。比如说，E^(2*Pi*I)表示。 Mathematica还预先定义了大量数学函数以供调用，调用格式为“函数名[自变量]”，预定义的函数名用大写字母开始 Abs[x] 求x的绝对值 Exp[x] 求e的x次幂 Log[x] 求x的自然对数In(x) Log[b,x] 求以b为底的x的对数 Sin[x],Cos[x],Tan[x] 求x的正弦、余弦和正切函数 ArcSin[x],ArcCos[x],ArcTan[x] 求x的反正弦、反余弦和反正切函数 Factorial[n]或n! 求n的阶乘（其中n可以取实数） Mathematica中函数定义自定义以小写字母开始，后跟数字和字母的组合例如：。try[x_]:=3+x*Sin[x^2]表示定义了函数try(x) = 3 + x sin(x2)。自定义函数的调用方式与预定义的函数完全相同，如 D[try[x],x]表示自定义函数try(x)对自变量x求导，输出结果为2 x2 Cos[x2]+Sin[x2]。 Mathematica中一个变量可以表示一个数，一个表达式，甚至一个图形。等号=”同时还有为变量赋值。x=3^2+4 定义了变量x，同时赋予该变量值为13。 2.2 符号演算 1) 解代数方程 Mathematica中Solve[x^2+p*x+q?0,x]，结果为 ； 又如求解方程x4 + 2 x2 + 5 = 0可以用命令Solve[x^4+2*x^2+5?0,x]，结果为 Solve命令还能求解代数方程组，使用格式为“Solve[{方程组}，{变量组}]”。 2) 求积分 Mathematica中可以用命令Integrate[x Sin[x],x]，结果为-x Cos[x]+Sin[x]。 Integrate命令也能求定积分，使用格式为“Integrate [被积函数，{积分变量，下限，上限}]”。例如求定积分可以用命令Integrate[Exp[-2 x]*Sin[x], {x,0,Infinity}]，结果为 1/5 。 3) 求导数和解常微分方程 Mathematica中D[ArcSin[x^2],x]；D命令也可以用来求函数的n阶导数，格式为“D [函数，{自变量，n}]”。 Mathematica中的通解可以用命令DSolve[y[x]+y[x]?2,y[x],x]，输出结果为{{y[x]?2+?-x C[1]}}。 存在定解条件时，Dsolve还能给出微分方程的特解，使用格式为“DSolve[{方程，条件}，待求函数，自变量]”，例如求微分方程的特解可以用命令DSolve[{y[x]+4 y[x]?0,y[0]?0,y[0]?6},y[x],x]，结果为{{y[x]?3 Sin[2 x]}}。 2.3 数值计算 1) 近似运算 Mathematica中的运算分为精确运算与近似运算，在一般情况下Mathematica总是进行精确运算，如果运算数本身为近似数或者操作者要求进行近似运算时才进行近似运算。Mathematica提供的近似（数值）计算的命令为“N”，它可以把精确数化为近似数。近似计算的命令格