(*Komentarzepiszesięwłaśnietak.Działająpolskeznakiiemotek!😀*)
In[]:=
(*Rysowaniewykresufunkcji*)​​Plot[Sqrt[1-x^2],{x,-1,1}]
Out[]=
-1.0
-0.5
0.5
1.0
0.2
0.4
0.6
0.8
1.0
In[]:=
(*Rysowaniewykresówkilkufunkcji.*)​​Plot[{Sqrt[1-x^2],-Sqrt[1-x^2],x},{x,-1,1}]
Out[]=
-1.0
-0.5
0.5
1.0
-1.0
-0.5
0.5
1.0
In[]:=
(*Domyślnieskalowanieosiedobieranejestautomatycznie,aobrazmakształtprostokąta.​​*Zagadka:jakiesądomyślneproporcjewykresu?Nagrodąjestoczywiściecukierek.​​*MożnaMathematicęporosićozachowanietejsamejskalinaobuosiach,dopisującAspectRatio->Automatic.*)​​Plot[{Sqrt[1-x^2],-Sqrt[1-x^2],x},{x,-1,1},AspectRatioAutomatic]
Out[]=
-1.0
-0.5
0.5
1.0
-1.0
-0.5
0.5
1.0
In[]:=
(*Czasemautomatyczniedobranyzakreswartościnaosiyjestnietaki,jakchcemy.​​*ZpomocąprzychodziPlotRange->AllalboPlotRange->{y1,y2}.*)​​Plot[1/(x^2+1),{x,-10,10}]​​Plot[1/(x^2+1),{x,-10,10},PlotRangeAll]​​Plot[1/(x^2+1),{x,-10,10},PlotRange{-1,1}]​​Plot[1/(x^2+1),{x,-10,10},PlotRange{-1,1},AspectRatioAutomatic]
Out[]=
-10
-5
5
10
0.1
0.2
0.3
0.4
0.5
0.6
Out[]=
-10
-5
5
10
0.2
0.4
0.6
0.8
1.0
Out[]=
-10
-5
5
10
-1.0
-0.5
0.5
1.0
Out[]=
-10
-5
5
10
-1.0
-0.5
0.5
1.0