6 a; L; O5 C+ c; f" A# z7 L$ V8 X( q7 Q|
# c, Q+ `% f7 w p* `$ k! r Mathematica的基本语法特征/ b! _" O i: X6 J1 |& a
如果你是第一次使用Mathematica,那么以下几点请你一定牢牢记住:1 h5 |! w0 f9 ^$ a0 R3 m6 Y8 o
Mathematica中大写小写是有区别的,如Name、name、NAME等是不同的变量名或函数名。6 w" m( k! k6 D: ^
- h5 p: y) m+ [( H5 x" ~系统所提供的功能大部分以系统函数的形式给出,内部函数一般写全称,而且一定是以
" ]. e0 ]$ b" Y. S4 P& g大写英文字母开头,如Sin[x],Conjugate[z]等。9 m+ m& \( g+ a! J
乘法即可以用*,又可以用空格表示,如2 3=2*3=6 ,x y,2 Sin[x]等;乘幂可以用“$ s0 J& q2 C; S1 t1 k2 b/ }' g
^”表示,如x^0.5,Tan[x]^y。
2 T% [" J+ Z' ]+ U% T6 A. A8 E+ Z自定义的变量可以取几乎任意的名称,长度不限,但不可以数字开头。% H$ Z: q: Z1 M g
当你赋予变量任何一个值,除非你明显地改变该值或使用Clear[变量名]或“变量名=.”
& F A5 C5 N/ t: F取消该值为止,它将始终保持原值不变。
, @) L7 `5 A$ l1 |7 j$ \: ?' c一定要注意四种括号的用法:()圆括号表示项的结合顺序,如(x+(y^x+1/(2x)));[]方括
! e$ P# t( `' ^2 V号表示函数,如Log[x],BesselJ[x,1];{}大括号表示一个“表”(一组数字、任意表达+ ~# Y; c9 y+ J( v Y# X8 l$ ]
式、函数等的集合),如{2x,Sin[12 Pi],{1+A,y*x}};[[]]双方括号表示“表”或“表 R1 w5 [* Z; T+ u% z9 Z
达式”的下标,如a[[2,3]]、{1,2,3}[[1]]=1。
5 |" w$ t4 u% m, x3 y6 M* XMathematica的语句书写十分方便,一个语句可以分为多行写,同一行可以写多个语句(
& Q. v' u5 J5 j' y' K" |& p4 O但要以分号间隔)。当语句以分号结束时,语句计算后不做输出(输出语句除外),否
8 W4 Y6 p% S6 p! m+ q2 K2 B! [ |则将输出计算的结果。$ |7 c6 X" M6 y5 _! G b/ a' P
' F7 G% F5 `3 J0 X; i( t! ?# {& L/ H+ s1 m, n. ~1 ?
一.数的表示及计算 ( M! }6 E6 |1 o6 V
" U4 E" c: K) `: \5 n1.在Mathematica中你不必考虑数的精确度,因为除非你指定输出精度,Mathematica总
) ?& d9 W+ k0 V4 V) z会以绝对精确的形式输出结果。例如:你输入! u4 O" [% K6 e' n1 w9 p
In[1]:=378/123,系统会输出Out[1]:=126/41,如果想得到近似解,则应输入7 W. Z6 g: Z% G9 ~8 ?
In[2]:=N[378/123,5],即求其5位有效数字的数值解,系统会输出Out[2]:=3.073! l8 R) j c1 p D5 i4 Y
2,另外Mathematica还可以根据你前面使用的数字的精度自动地设定精度。3 J ~& F- r8 i& k, n. L0 u
Mathematica与众不同之处还在于它可以处理任意大、任意小及任意位精度的数值,
+ ?# }* K: _3 P如100^7000,2^(-2000)等数值可以很快地求出,但在其他语言或系统中这是不可想象的' G1 n$ c" G2 ]* w* B9 v; t
,你不妨试一试N[Pi,1000]。
6 h' w) ?- X4 `2 @Mathematica还定义了一些系统常数,如上面提到的Pi(圆周率的精确值),还有E(自然对
& P5 U9 d6 N# t6 c( `* h5 M5 }6 X数的底数)、I(复数单位),Degree(角度一度,Pi/180),Infinity(无穷大)等,不要小
1 W$ o+ E- b8 [2 b7 s看这些简单的符号,它们包含的信息远远大于我们所熟知的它们的近似值,它们的精度
" x4 s2 A" D# ?* R7 [( I! {4 R也是无限的。& \- C' ~3 q4 B( ^. x. i
二.“表”及其用法0 m: y8 L" G$ p8 T+ s. c4 L; V
“表”是Mathematica中一个相当有用的数据类型,它即可以作为数组,又可以作为矩阵
/ Y( i- X& V: ^;除此以外,你可以把任意一组表达式用一个或一组{}括起来,进行运算、存储。可以
$ u# B" N8 X- z说表是任意对象的一个集合。它可以动态地分配内存,可以方便地进行插入、删除、排 d6 n; I# ~( w
序、翻转等等几乎所有可以想象到的操作。7 N7 X2 E7 A6 A
如果你建立了一个表,你可以通过下表操作符[[]](双方括号)来访问它的每一个元
* T; \$ F6 Q8 s$ d" g/ k) X j( ~素,如我们定义table={2,Pi,Sin[x],{aaa,A*I}}为一个表,那么table[[1]]就为2,ta2 d# |0 @+ L* M
ble[[2]]就是Pi,而table[[3,1]]表示嵌套在table中的子表{aaa,A*I}的第一个元素即& I0 _1 _: I7 H% w6 `9 S7 J
aaa,table[[3,2]]表示{aaa,A*I}第二个元素即A*I。总之,表每一层次上并列的部分用4 X1 ?; ] N* H
逗号分割,表可以无穷嵌套。
$ G$ J+ z, x2 _* D2 j* [6 K你可以通过Append[表,表达式]或Prepend[表,表达式]把表达式添加到表的最前面或最后; U% D; k3 T: o4 f/ y
面,如Append[{1,2,3},a]表示{1,2,3,a}。你还可以通过Union[表1,表2,......],Ji
* R% ~$ T6 N3 n* v- k& ^" `0 b+ X% jon[表1,表2,......]来把几个表合并为一个表,二者不同在于Union在合并时删除了各表
9 z8 e* Q4 e+ x, @8 N( U中重复的元素,而后者仅是简单的合并;你还可以使用Flatten[表]把表中所有子表"抹# B0 J% l, g2 k8 f/ h
平"合并成一个表,而Patition[表,整数n]把表按每n个元素分段作为子表,集合成的表
( `! {6 r) D( u。如Flatten[{1,2,{Sin[x],dog},{{y}}}]表示{1,2,Sin[x],y},而Partition[{1,2,Sin& I5 H0 G( n/ N5 |8 [: f
[x],y},2]把表每两个分段,结果为{{1,2},{Sin[x],y}};还可以通过Delete[表,位置8 D# b; l- K& q }1 G& E
]、Insert[表,位置]来向表中按位置插入或删除元素,如要删除上面提到的table中的
4 e4 t1 h* ]; ?3 yaaa,你可以用Delete[table,{3,1}]来实现;Sort[表]给出了表中各元素的大小顺序,R3 V8 }6 D7 e" A) t) ]
everse[表]、RotateLeft[表,整数n]、RotateRight[表,整数n]可以分别将一个表进行, F1 i0 y6 k0 |( d, f
翻转、左转n个元素、右转n个元素等操作,Length[表]给出了表第一个层次上的元素个# g3 N/ ~9 [' M+ J! H9 j
数,Position[表,表达式]给出了表中出现该表达式的位置,Count[表,表达式]则给出
8 \# Q! `$ H$ K: T o表达式出现的次数。各种表的操作函数还有很多,这里就不再一一介绍了。& m9 C* W' I w
2 d9 P1 x7 i& T. ^9 w _
三.图形函数
, c. {$ a6 x; e# C. q/ eMathematica的图形函数十分丰富,用寥寥几句就可以画出复杂的图形,而且可以通过变# ]' Z6 y% y1 ?& o8 v
量和文件存储和显示图形,具有极大的灵活性。
- n8 M2 v5 }6 r) }) j0 f' Q 图形函数中最有代表性的函数为Plot[表达式,{变量,下限,上限},可选项],(其# C1 u" w3 p9 ]7 W3 v4 [* L" Q
中表达式还可以是一个"表达式表",这样可以在一个图里画多个函数);变量为自变量;
0 W- _5 U- E, H% ]; |上限和下限确定了作图的范围;可选项可要可不要,不写系统会按默认值作图,它表示 L' z) @ z6 f$ P! m5 t' V
对作图的具体要求。例如Plot[Sin[x],{x,0,2*Pi},AspectRatio-1]表示在0<X<2PI的范
; h4 a6 s' A) e1 m* U围内作函数Sin[x]的图象,AspectRatio为可选项,表示图的x向y向比例,AspectRatio) w# M( u2 y8 |* f6 P
-1表示纵横比例为1:1,如果不写这一项,系统默认比例为1:GodenRatio,即黄金分割的% S+ ?. D0 Z0 y: }
比例(注意,可选项的写法为可选项名-可选项值),Plot还有很多可选项,如PlotRange
' e y r" \( z$ j) q5 C$ E表示作图的值域,PlotPoint表画图中取样点的个数,越大则图越精细,PlotStyle来确
]& @, j3 |& a7 P0 O: C定所画图形的线宽、线型、颜色等特性,AxesLabel表式在坐标轴上作标记等等。
0 \0 ^" \* W$ k6 Y/ k.二维函数作图1 D1 s3 R3 ^: y1 u
Plot[函数f,{x,xmin,xmax},选项], z! @) I$ o& V+ H) e
在区间{x,xmin,xmax}上,按选项的要求画出函数f的图形/ g; S& Q9 {8 B# A N0 H9 Y8 G
Plot[{函数1,函数2},{x,xmin,xmax},选项]6 E" d& y' q2 Y6 H& U
在区间{x,xmin,xmax}上,按选项的要求画出几个函数的图形
: s% K% \7 G% _& t) H$ a6 O.二维参数画图函数9 `* s' I# ?; M2 r9 T
ParametricPlot[{x[t],y[t]},{t,t0,t1},选项] 画一个X轴,Y轴坐标为{x[t],y[t]},参
) h7 P6 i, r# D; Y% x: t变量t在[t0,t1]中的参数曲线+ t/ }( A' O" s ]
.三维函数作图$ ?8 z ]# O7 J/ m' G( m
Plot3D[f[x,y],{x,x0,x1},{y,y0,y1},选项]0 g+ Z) d3 @# M: g1 N7 [/ p3 Z, d2 t
在区域上,画出空间曲面f[x,y].
% z5 G2 V) R& [2 g3 N" P除Plot,二维参数方程作图的ParametricPlot[{x(t),y(t)},{t,下限,上限},可选项]、9 x8 m, T" @/ @1 o1 l3 c
三维作图的Plot3D[二维函数表达式,{变量1,下限,上限}, {变量2,下限,上限},可! n# W, F( G( X C5 \1 ~6 J
选项}]、三维参数方程作图的ParametricPlot3D[{x(u,v),y(u,v),z(u,v)},{u,下限,上
, ~3 m! U- [7 f& T限},{v,下限,上限},可选项]外,还有画二维等高线图ContourPlot[二元表达式,{变量
' d" W; P( h9 D+ s0 S1,下限,上限}, {变量2,下限,上限},可选项}]、画二维密度图的DensityPlot[二元5 x N. M$ w9 C! l8 b: ]; t
表达式,{变量1,下限,上限}, {变量2,下限,上限},可选项}]等等不一而足。 $ p5 Y( I" h. [4 k0 l* F0 x
除使用上述函数作图以外,Mathematica还可以象其他语言一样使用图形元语言作图1 ?/ z) l. t: r6 v
,如画点函数Point[x,y],画线函数Line[x1,y1,x2,y2],画圆的Circle[x,y,r],画矩形
1 Q3 p) v) O1 D. w6 d- g: J6 ^和多边形的Rectangle和Polygon,字符输出的Text[字符串,输出坐标],还有颜色函数RG4 {/ E. K2 p6 t' G \3 m
BColor[red,green,blue]、Hue[],GrayLevel[gray]来描述颜色的亮度、灰度、饱和度,/ d5 D! d; S1 X$ q
用PointSize[相对尺度]、Thickness[相对尺度]来表示点和线的宽度。总之Mathematic
4 i% Q; b. h. ^a可以精确地调节图形的每一个特征 |