


Prepara tus exámenes y mejora tus resultados gracias a la gran cantidad de recursos disponibles en Docsity
Gana puntos ayudando a otros estudiantes o consíguelos activando un Plan Premium
Prepara tus exámenes
Prepara tus exámenes y mejora tus resultados gracias a la gran cantidad de recursos disponibles en Docsity
Prepara tus exámenes con los documentos que comparten otros estudiantes como tú en Docsity
Encuentra los documentos específicos para los exámenes de tu universidad
Estudia con lecciones y exámenes resueltos basados en los programas académicos de las mejores universidades
Responde a preguntas de exámenes reales y pon a prueba tu preparación
Consigue puntos base para descargar
Gana puntos ayudando a otros estudiantes o consíguelos activando un Plan Premium
Comunidad
Pide ayuda a la comunidad y resuelve tus dudas de estudio
Ebooks gratuitos
Descarga nuestras guías gratuitas sobre técnicas de estudio, métodos para controlar la ansiedad y consejos para la tesis preparadas por los tutores de Docsity
Asignatura: Algebra, Profesor: Juan Rodriguez Jordana, Carrera: Enginyeria Geomàtica i Topografia, Universidad: UPC
Tipo: Ejercicios
1 / 4
Esta página no es visible en la vista previa
¡No te pierdas las partes importantes!



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
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) ;
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
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) ;
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
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