Trazado función implícita

Question

Estoy intentando trazar la siguiente fórmula implícita en R:

1 = x^2 + 4 * (y^2) + x * y

que debe ser una elipse. Me gustaría muestrear aleatoriamente los valores xy luego generar el gráfico basado en esos.

Here's un hilo relacionado, pero las soluciones allí parecen ser específicas del caso 3D. Esta pregunta ha sido más resistente a googlear que yo hubiera esperado, así que tal vez el lenguaje R llama a las fórmulas implícitas algo más.

¡Gracias de antemano!

Answer 1

Dos cosas que quizás no entiendas. En tablas de funciones implícitas con esa técnica, tiene que mover todos los términos del lado derecho de la función para que su función implícita se convierte en:

0 = -1+ x^2 + 4*(y^2) + x*y 

A continuación, utilizando el valor de contorno de cero tendrá sentido:

x<-seq(-1.1,1.1,length=1000) 
y<-seq(-1,1,length=1000) 
z<-outer(x,y,function(x,y) 4*y^2+x^2+x*y -1) 
contour(x,y,z,levels=0) 

Recibí un mensaje incorrecto en la primera versión. @mnels 'era correcto.