Mathematika Beispiele 2

Beispiel19

Needs["Graphics`PlotField`"]

PlotVectorField[{y, - x}, {x, -10, 10}, {y, -10, 10}];

Beispiel19

Beispiel20

PlotVectorField[{1/y, -x/y^2}, {x, -10, 10}, {y, -10, 10}];

Beispiel20

Beispiel21

ParametricPlot3D[{t, t^2, t^3}, {t, -2, 2}];

Beispie21

Gamma-Funktion

Plot[Gamma[x], {x, 0.1, 5}];

Beispie22

Beispiel23

Needs["Graphics`FilledPlot`"]

FilledPlot[Sin[x], {x, -2, 5}];

Beispie23

Lösen der Gleichung

Beispiel24

Needs["Graphics`ImplicitPlot`"]

ImplicitPlot[x^2+2y^2==3, {x, -2, 2}]

Beispie24

Lösen der Gleichung

Beispiel25

ImplicitPlot[(x^2+y^2)^2==(x^2-y^2), {x, -2, 2}];

Beispie25

Lösen der Gleichung

Beispiel26

ImplicitPlot[(x^2+y^2)^2==3x y, {x, -2, 2}];

Beispie26

Lösen der Gleichung

Beispiel27

ImplicitPlot[x^3+y^3==3x y, {x, -3, 3}];

Beispie27
Needs["Graphics`ComplexMap`"]
CartesianMap[ Exp, {-1,1,0.2},{-2,2,0.2}];
Beispiel28
PolarMap[ Log, {0.1,10,0.5},{-3,3,0.15}]; Beispiel29
PolarMap[ 1/Conjugate[#]&, {0.1,5.1,0.5},{-Pi,Pi,Pi/12}]; Beispiel30
CartesianMap[ Zeta,{0.1,0.9},{0,20}]; Beispiel31
SetOptions[ Plot3D, PlotPoints->25];
CartesianMap[ Zeta,{0.1,0.9},{0,20}]
Beispiel32
PolarMap[ Sqrt,{1},{-Pi-0.0001,Pi}]; Beispiel33
PolarMap[ Identity,{1,2},{-Pi,Pi,Pi/12}]; Beispiel34
CartesianMap[ 1/Conjugate[#]&, {-2,2,4/19},{-2,2,4/19},PlotRange->All]; Beispiel35