PRÁCTICA I : GRÁFICAS EN 2 D

Representación de curvas en implícitas-explícitas.

Ejemplo 1 :

ContourPlot[x^2+y^2==16,{x,-4,4},{y,-4,4},Axes->True,Frame->False,AspectRatio-> Automatic]

Ejemplo 2 :

ContourPlot[y==(x-3)^2-3,{x,-4,8},{y,-4,30}]

Plot[(x-3)^2-3,{x,-4,4}]

Para Practicar 1 :

ContourPlot[((x/2))^2+((y/3))^2==1,{x,-3,3},{y,-3,3}]

Para Practicar 2 :

ContourPlot[((x/2))^2-((y/3))^2==1,{x,-10,10},{y,-10,10}]

Representación de curvas en paramétricas.

Ejemplo 1 :

ParametricPlot[{3*Cos[t],3*Sin[t]},{t,0,2*π}]

Para practicar 1 :

ParametricPlot[{1.5*Cos[t],2.5*Sin[t]},{t,0,2*π},Axes->True,Frame->False,AspectRatio-> Automatic]

Representación de regiones.

Ejemplo 1 :

RegionPlot[x^2+y^2≤9,{x,-3.1,3.1},{y,-3.1,3.1},Axes->True,Frame->False,AspectRatio-> Automatic]

Ejemplo 2 :

RegionPlot[x^2+y^2≥9,{x,-10,10},{y,-10,10}]

Ejemplo 3 :

RegionPlot[x^2+y^2≥2&&x≥1&&y≤1,{x,0,10},{y,-5,2},Axes->True,Frame->False,AspectRatio-> Automatic]

Ejemplo 4 :

RegionPlot[1≤x*y≤2&&x≤y≤4x,{x,0,2},{y,0.75,2.75},Axes->True,Frame->False,AspectRatio-> Automatic]

Para practicar 1 :

RegionPlot[1≤x^2+y^2≤9,{x,-3,3},{y,-3,3},Axes->True,Frame->False,AspectRatio-> Automatic]

Para practicar 2 :

RegionPlot[0≤y≤1&&x≤y≤2x,{x,0,1.3},{y,0,1.2},Axes->True,Frame->False,AspectRatio-> Automatic]

Ejercicios Finales.

1 :

ContourPlot[x+3y==6,{x,-4,4},{y,0,4},Axes->True,Frame->False]

2 :

ContourPlot[x==3y^2,{x,0,40},{y,-4,4}]

3 :

ParametricPlot[{0.25t*Cos[t],0.25t*Sin[t]},{t,0,40}]

4 :

RegionPlot[x^2+y^2≤2y&&x^2+y^2≤1&&x≥0,{x,-0.1,1},{y,-0.1,1.1}]

5 :

RegionPlot[((1-x)/2)≤y≤1-x^2&&x^2+y^2≤1&&x≥0,{x,-0.1,1},{y,0,1.1},Axes->True,Frame->False,AspectRatio-> Automatic]

6 :

RegionPlot[y≥0&&y≤x+2&&y≤4-x^2,{x,-4,4},{y,0,3},Axes->{True,True},Frame->False]

COMPLEMENTOS

Plot[(x-3)^2-3,{x,-4,4},Axes->True,AxesLabel->{"x(Tiempo)","y(Bacterias)"},PlotStyle->{Blue,Thickness[0.01]},GridLines->Automatic]