<div dir="ltr">Buenas tardes,<div><br></div><div style>Estoy intentando mejorar un gráfico que construyo pero de manera "bruta" y quiere encontrar una manera más eficiente. </div><div style>El gráfico en cuestión tiene más partes pero para simplificar la parte que me interesa es esta:</div>
<div style><br></div><div style><img src="cid:ii_13d461c874ac5644" alt="Imágenes integradas 5"><br></div><div style><br></div><div style>Esto es una elipse de confianza de unos puntos, la elipse la consigo ayudándome de dataEllipse (paquete car), para llegar  a este gráfico lo hago de la siguiente manera:</div>
<div style><br></div><div style>-Construyo una función que me dice si un punto (x,y) está dentro o no de la elipse.</div><div style><br></div><div style>-Hago un mallado de 100x100 (en pasos de 0,125) y miro si estoy dentro de la elipse o no (<b>Esto es lo que quiere evitar) </b>(podría hacer el mallado solo desde el rectángulo que envuelve la elipse pero quiero conseguir algo mejor)</div>
<div style><br></div><div style>-Voy recorriendo el eje x y me quedo con el valor de y en  "FUERA" antes de "DENTRO" y el "FUERA" después de "DENTRO" y así poder construir el gráfico anterior que está construido en trozos, si pongo colores:</div>
<div style><br></div><div style><img src="cid:ii_13d461c35ecbfa9d" alt="Imágenes integradas 4"><br></div><div><br></div><div style>Alguien tiene alguna sugerencia de como conseguir esto pero sin tener que hacer un mallado, con geom_path puedo dibujar la elipse pero no se hacer lo que quiero.</div>
<div style><br></div><div style>Adjunto un código reproducible con lo que tengo  (en el código hay algunos for que supongo que se podrían juntar pero lo que realmente hace lento el proceso es la sentencia apply(malla[,1:2],1,cual) que es lo que quiero evitar)</div>
<div style><br></div><div style>Muchas gracias y saludos.</div><div><br></div><div><br></div><div><br clear="all"><div><br></div>-- <br>Jorge Ayuso Rejas<br>
</div></div>