In[5]:=Show[Graphics[sawline],Axes->True]
10.52-0.5345-1 Out[5]= -Graphics-
下面的例子是说明了Retangle的图形绘制，例子中用一些小矩形逼近正弦曲线与x轴所成面积。程序中生成一个图形集合并显示出来。
In[6]:=St=Table[Rectangle[{x,0},{x+0.08,Sin[x]}],{x,0,2Pi,0.15}] Show[Graphics[St],Axes->True]
10.51-0.52345-1 Out[7]= -Graphics-
4.3 图形的样式 我们称图形的颜色、曲线的形状和宽度等特性为图形样式。在本节中，我们就图形的各种样式，尤其是曲线的样式进行学习。下面给出选项用于设置图形样式： Graykvel[] 灰度介于0(黑)到l(白)之间
RGBColor[r,g,b] 由红、绿，蓝组成的颜色，每种色彩取0到1之间的数 Hue[A] 取0到1之间的色彩 Hue[h,s,b] 指定色调，位置和亮度的颜色，每项介于0到1之间 PointSize[d] 给出半径为d的点，单位是Plot的一个分数 AbsolutePointSize[d] 给出半径为d的点(以绝对单位量取) Thickness[w] 给所有线的宽度w，单位是Plot的分数 AbsoluteThickness[w] 给所有线的宽度w，(以绝对单位量取)
31
Dashing[wl,w2,….] 给所有线为一系列虚线，虚线段的长度为wl，w2,… Absolutedashing[{w1,w2,…..}] 以绝对单位给出虚线长度 PlotStyle->style 设立Plot中所有曲线的风格 PlotStyle->{{Style1},{Style2}…….} 设立Plot中一些列曲线的风格 MeshStyle->Style 设立宽度和表面网格的风格
1. 图形颜色的设置
在Mathematicaa提供各种图形指令中，对图形元素颜色的设置是一个很重要的设置.。下面给出三条不同颜色的正弦曲线，此处以灰度表示，即颜色深浅不同。
In[1]:=Plot[{Sin[x],Sin[2x],Sin[3x]},{x,0,2Pi},PlotStyle->{RGBColor[0.9,0,0], RGBColor[0,0,0.9]}]
1RGBColor[0,0.9,0], 0.51-0.52345-1 Out[1]= -Graphics-
下面用不同的色调对三个菱形进行着色。 In[2]:=v1={{-1,0},{0,-1},{1,0},{0,1}}; Show[Graphics[{Hue[0.1],Polygon[3*v1], Hue[0.8],Polygon[2*v1], Hue[0.2],Polygon[v1]}, AspectRatio->Automatic]]
Out[2]= -Graphics- 2. 图形大小
下面是一些点，注意点大小的控制。
In[3]:=Table[Point[{n^2,Prime[n]}],{n,5}];Show[Graphics[{PointSize[0.1],%}],PlotRange->All];
32
下面的点的控制是用绝对单位：
In[4]:=ListPlot[Table[Prime[n],{n,10}],Prolog->AbsolutePointSize[5]]
25201510468 Out[4]= -Graphics-
3. 线段的控制
下面的例子是控制线段的宽度，使用的是绝对控制。
In[5]:=Show[Graphics[{Table[{AbsoluteThickness[d],Line[{{0,0},{1,d}}]},{d,5}], Line[{{0,5},{1,0}}]}]] Out[5]= -Graphics- Mathematica提供的虚线指令可生成多种不同的复杂虚线。
4.4 图形的重绘和组合
每次绘制图形后，Mathematica保存了图形的所有信息，所以用户可以重绘这些图形。我们在重绘图形的时候，还可以改变一些使用。下面是常用重绘图形的函数。
Show[plot] 重绘图形
33
Show[plot,option->value] 改变方案重绘图形 Show[plot1,plot2,plot3…] 多个图形的绘制 Show[GraphcisArray[{{plot1,plot2,…}…}]] 绘制图形矩阵 InputForm[plot] 给出所有的图形信息
1. 使用Show显示图形
下面绘制函数sinx 的图形。 In[1]:=Plot[Sin[x^2],{x,-Pi,Pi}]
12
0.5-3-2-112-0.5-1 Out[1]= -Graphics- In[2]:=Show[%] 10.5-3-2-112-0.5-1 Out[2]= -Graphics- 重绘图形时，可以改变命令的设置，下面改变y的比例同时给图加边框： In[3]:=Show[%,PlotRange->{-1,2},Frame->True]] 21.510.50-0.5-3-2-1012 34
Out[3]= -Graphics-
2. 使用Show命令进行组合
也可使用Show进行图形组合。图形组合与图形是否有相同的比例无关，这是Mathematica会自动选择新的比例来绘制图形。下面绘制函数xsin(2x+π)的图形和xcos2x 然后绘制在一张图时。
In[4]:=f1=Plot[x*Sin[2x+Pi],{x,0,4Pi}]
1052-546810-10 Out[4]= -Graphics-
In[5]:=f2=Plot[x*Cos[2x],{x,0,4Pi}] 1052-546810-10 Out[5]= -Graphics- In[6]:=Show[f1,f2] 1052-546810-10 Out[6]= -Graphics-
3. 将多个图形组合为一个图形
我们也可把图形组合为一个图形，我们还可以用GraphicsArray把多个图形绘制在一个图形矩阵中如下图。
35