如何使用mathematica软件产生图形

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/23 21:29:07
如何使用mathematica软件产生图形
xϋ@Β6^K ^V(x $3aB/VDXD5?nݓo:IְB{$|$G)ȯK~-auvrwҸgOXXO(ۑ[JN_[Q\$ޕZb&+zaHNx6O08 |BdݚF\mƎ1?X,k TVZ*flh)E Ŵ'/ģduIC2#'!Z\xluқzgHPWf GjӪA5Q\Ȁ6̇t }}@U&#o|ҔW/v?S6 DuNVip݆ c?_k6db\g]T<{Qwp\R{Fpg$2ұOBbO[$fy_r于X]Q^oOJ)|*CFF %ASG|»N

如何使用mathematica软件产生图形
如何使用mathematica软件产生图形

如何使用mathematica软件产生图形
例子:
函数绘图:
Plot[Sin[x],{x,10,-10}]
Plot3D[Sin[x y],{x,10,-10},{y,10,-10}]
ContourPlot[Sin[x]+Sin[y]==1,{x,10,-10},{y,10,-10}]
ContourPlot3D[Sin[x]+Cos[y]+Tan[z]==2,{x,10,-10},{y,10,-10},{z,10,-10}]
RegionPlot[x/y>=1,{x,10,-10},{y,10-,10}]
RegionPlot3D[Sin[x+y]/zAxis]
ListLinePlot[Table[Sin[x^2],{x,1,20}]]
ListPlot3D[Table[Sin[x+y/2],{x,-10,10},{y,-10,10}]]
ListPointPlot3D[Table[Sin[x+y/2],{x,-10,10},{y,-10,10}]]
ParametricPlot[{Sin[x],Sin[2x]},{x,-10,10}]
ParametricPlot3D[{Cos[x],Sin[x]+Cos[y],Sin[y]},{x,10,-10},{y,10,-10}]
DiscretePlot[Prime[x], {x, 1, 100}]
DiscretePlot3D[x + y, {x, 10}, {y, 10}]
VectorPlot[{x,y},{x,10,-10},{y,10,-10}]
VectorPlot3D[{x, y, z}, {x, -10, 10}, {y, -10, 10}, {z, -10, 10}]
普通绘图:
Graphics[{Line[{{0,0},{0,1}}],Polygon[{{1,1},{1,2},{2,2}}]}]
Graphics3D[Sphere[]]
Graphics3D[Cubiod[]]
Graphics3D[Cylinder[]]
多面体:
Manipulate[
Column[{PolyhedronData[g], PolyhedronData[g, p]}], {g,
PolyhedronData[All]}, {p,
Complement @@ PolyhedronData /@ {"Properties", "Classes"}}]