Docsity
Docsity

Prepara tus exámenes
Prepara tus exámenes

Prepara tus exámenes y mejora tus resultados gracias a la gran cantidad de recursos disponibles en Docsity


Consigue puntos base para descargar
Consigue puntos base para descargar

Gana puntos ayudando a otros estudiantes o consíguelos activando un Plan Premium


Orientación Universidad
Orientación Universidad


Practica5 Maple, Ejercicios de Álgebra

Asignatura: Algebra, Profesor: Juan Rodriguez Jordana, Carrera: Enginyeria Geomàtica i Topografia, Universidad: UPC

Tipo: Ejercicios

2010/2011

Subido el 21/01/2011

xandry87
xandry87 🇪🇸

4.5

(42)

36 documentos

1 / 4

Toggle sidebar

Esta página no es visible en la vista previa

¡No te pierdas las partes importantes!

bg1
O
OO
O O
OO
O
O
OO
O O
OO
O
O
OO
O O
OO
O
EPSEB - EGT ALGEBRA PRACTICE 5 21 / 12 / 10
In this practice we will learn how to plot a curve given by an implicit equation and will
apply what we learned in previus practices about coordinate transformations
restart:with(LinearAlgebra):with(plots):
In the Maple Help, look for how to plot an implicit curve with the sentence "implicitplot".
Then, plot the conical curve
K
2 x
2
C52 x
K
198
K
12 x yC60 y
K
2 y
2
= 0
curve:=-2*x^2+52*x-198-12*x*y+60*y-2*y^2 = 0;
implicitplot(curve,x=-10..10, y=-10..10,scaling=constrained);
curve :=
K
2 x
2
C52 x
K
198
K
12 x yC60 y
K
2 y
2
= 0
x
K
10
K
505 10
y
K
10
K
5
5
10
Now apply an axis translation to the point (4,3) and a 30º axis rotation to the conical.
Find the equation and plot the conical in the new axis
Let's do it in 2 steps.
First let's translate the origin to the point (4,3)
curve2:=subs(x=X+4,y=Y+3,curve);
implicitplot(curve2,X=-10..10, Y=-10..10,scaling=constrained)
;
pf3
pf4

Vista previa parcial del texto

¡Descarga Practica5 Maple y más Ejercicios en PDF de Álgebra solo en Docsity!

OOOOOOOO

OOOOOOOO

OOOOOOOO

EPSEB - EGT ALGEBRA PRACTICE 5 21 / 12 / 10

In this practice we will learn how to plot a curve given by an implicit equation and will apply what we learned in previus practices about coordinate transformations

restart:with(LinearAlgebra):with(plots): In the Maple Help, look for how to plot an implicit curve with the sentence "implicitplot". Then, plot the conical curve K 2 x^2 C 52 x K 198 K 12 x y C 60 y K 2 y^2 = 0

curve:=-2x^2+52x-198-12xy+60y-2y^2 = 0; implicitplot(curve,x=-10..10, y=-10..10,scaling=constrained); curve := K 2 x^2 C 52 x K 198 K 12 x y C 60 y K 2 y^2 = 0

x

K 10 K 5 0 5 10

y

K 10

K 5

Now apply an axis translation to the point (4,3) and a 30º axis rotation to the conical. Find the equation and plot the conical in the new axis Let's do it in 2 steps. First let's translate the origin to the point (4,3)

curve2:=subs(x=X+4,y=Y+3,curve); implicitplot(curve2,X=-10..10, Y=-10..10,scaling=constrained) ;

OOOOOOOO

curve2 := K 2 X C 4 2 C 52 X C 190 K 12 X C 4 Y C 3 C 60 Y K 2 Y C 3 2 = 0

X

K 10 K 5 0 5 10

Y

K 10

K 5

Now definite the 30º axis rotation and substitute in the curve equation

ang:=Pi/6: R:=Matrix([[cos(ang),sin(ang)],[-sin(ang),cos(ang)]]); M:=R^(-1); mov:=M.<s,t>; curve3:=subs(X=mov[1],Y=mov[2],curve2); collect(simplify(expand(%)),{s,t}); implicitplot(curve3,s=-10..10, t=-10..10,scaling=constrained) ;

R :=

K^1

M :=

3 K^1

mov2 :=

3 s K 1 2

t C 4

1 2

s C 1 2

3 t C 3

curve4 := K 2 1 2

3 s K 1 2

t C 4

2 C 26 3 s K 26 t C 190 K 12 1 2

3 s K 1 2

t

C 4 1

s C 1 2

3 t C 3 C 30 s C 30 3 t K 2 1 2

s C 1 2

3 t C 3

2 = 0

K 3 3 K 2 s^2 K 6 s t K 4 C K 2 C 3 3 t^2 = 0

s

K 10 K 5 0 5 10

t

K 10

K 5