<div dir="ltr">Gracias Daniel, esa opción la he pensado pero no me sirve.<div><br></div><div style>El gráfico al que construyo es más complicado, lo de la elipse es una parte:</div><div style><img src="cid:ii_13d4715a6850b837" alt="Imágenes integradas 1" width="710" height="581"><br>
</div><div style><br></div><div style><br></div><div style>Así que no es una opción colorear el fondo. Lo seguiré haciendo hasta ahora, muchas gracias de nuevo.</div><div style><br></div><div style>Lo ideal seria un geom_polygon con un fill del complementario pero... no he encontrado nada.</div>
<div style><br></div><div style>Saludos y gracias.</div><div style><br></div><div style><br></div><div style><br></div><div style><br></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">El 7 de marzo de 2013 23:51, daniel <span dir="ltr"><<a href="mailto:daniel319@gmail.com" target="_blank">daniel319@gmail.com</a>></span> escribió:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">¿Te sirve usar un color en el background?<div><br></div><div><span style="color:rgb(51,51,51);font-family:Menlo,Monaco,Consolas,'Courier New',monospace;font-size:12px;line-height:18px;white-space:pre-wrap;background-color:rgb(245,245,245)">+ theme(panel.background = element_rect(colour = "pink"))</span></div>
<div><span style="color:rgb(51,51,51);font-family:Menlo,Monaco,Consolas,'Courier New',monospace;font-size:12px;line-height:18px;white-space:pre-wrap;background-color:rgb(245,245,245)"><br></span></div><div><span style="color:rgb(51,51,51);font-family:Menlo,Monaco,Consolas,'Courier New',monospace;font-size:12px;line-height:18px;white-space:pre-wrap;background-color:rgb(245,245,245)">y dentro de la ellipse usas el color de theme_classic (creo que es este el de fondo gris pero no estoy seguro).</span></div>
<div><span style="color:rgb(51,51,51);font-family:Menlo,Monaco,Consolas,'Courier New',monospace;font-size:12px;line-height:18px;white-space:pre-wrap;background-color:rgb(245,245,245)"><br></span></div><div><span style="color:rgb(51,51,51);font-family:Menlo,Monaco,Consolas,'Courier New',monospace;font-size:12px;line-height:18px;white-space:pre-wrap;background-color:rgb(245,245,245)">Daniel Merino</span></div>
<div><font color="#333333" face="Menlo, Monaco, Consolas, Courier New, monospace"><span style="font-size:12px;line-height:18px;white-space:pre-wrap"><br></span></font></div><div><font color="#333333" face="Menlo, Monaco, Consolas, Courier New, monospace"><span style="font-size:12px;line-height:18px;white-space:pre-wrap">Al grafico que te envie antes le pondria tambien xlim y ylim para que la ellipse tenga mejor forma de ellipse.</span></font></div>
<div><font color="#333333" face="Menlo, Monaco, Consolas, Courier New, monospace"><span style="font-size:12px;line-height:18px;white-space:pre-wrap"><br></span></font></div><div><font color="#333333" face="Menlo, Monaco, Consolas, Courier New, monospace"><span style="font-size:12px;line-height:18px;white-space:pre-wrap"><br>
</span></font><br><div class="gmail_quote">El 7 de marzo de 2013 17:59, Jorge Ayuso Rejas <span dir="ltr"><<a href="mailto:jayusor@gmail.com" target="_blank">jayusor@gmail.com</a>></span> escribió:<div><div class="h5">
<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr">Gracias Daniel,<div><br></div><div>Quiero justo lo contrario, osea pintar el exterior de la elipse.</div><div><br></div><div>Muchas gracias!</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">
El 7 de marzo de 2013 21:37, daniel <span dir="ltr"><<a href="mailto:daniel319@gmail.com" target="_blank">daniel319@gmail.com</a>></span> escribió:<div><div><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
No se si entendí lo que quieres, pero no entendí porque usas geom_area, para pintar el interior de geom_path me parece mejor usar geom_polygon. Fijate si algo asi te ayuda:<div><br></div><div><div>rm(list=ls())</div><div>
set.seed(12345)</div>
<div>library(ggplot2)</div><div>library(car)</div><div>library(fields)</div><div>library(memisc)</div><div><br></div><div>datos<-data.frame(x=rnorm(20,60,15),y=rnorm(20,90,2))</div><div>dataEllipse(datos$x,datos$y,xlim=c(0,100),ylim=c(0,100),levels=.99)</div>
<div><br></div><div>x_e <- dataEllipse(datos$x,datos$y,levels=.99)[][,1]</div><div>y_e <- dataEllipse(datos$x,datos$y,levels=.99)[][,2]</div><div>dfellipse <- data.frame( x = x_e, y = y_e)</div><div>ggplot() + geom_point( data = datos, aes( x= datos$x, y = datos$y)) + geom_polygon(data = dfellipse, aes( x = x_e, y = y_e), col='salmon', alpha=0.25)</div>
<div><br></div></div><div><br></div><div>Daniel Merino</div><div><br></div><div><br><br><div class="gmail_quote">El 7 de marzo de 2013 15:32, Jorge Ayuso Rejas <span dir="ltr"><<a href="mailto:jayusor@gmail.com" target="_blank">jayusor@gmail.com</a>></span> escribió:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div><div dir="ltr">Buenas tardes,<div><br></div><div>Estoy intentando mejorar un gráfico que construyo pero de manera "bruta" y quiere encontrar una manera más eficiente. </div>
<div>El gráfico en cuestión tiene más partes pero para simplificar la parte que me interesa es esta:</div>
<div><br></div><div><img alt="Imágenes integradas 5"><br></div><div><br></div><div>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><br></div><div>-Construyo una función que me dice si un punto (x,y) está dentro o no de la elipse.</div><div><br></div><div>-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><br></div><div>-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><br></div><div><img alt="Imágenes integradas 4"><br></div><div><br></div><div>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><br></div><div>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><br></div><div>Muchas gracias y saludos.</div><span><font color="#888888"><div><br></div><div><br></div><div><br clear="all"><div><br></div>-- <br>Jorge Ayuso Rejas<br>
</div></font></span></div>
<br></div></div>_______________________________________________<br>
R-help-es mailing list<br>
<a href="mailto:R-help-es@r-project.org" target="_blank">R-help-es@r-project.org</a><br>
<a href="https://stat.ethz.ch/mailman/listinfo/r-help-es" target="_blank">https://stat.ethz.ch/mailman/listinfo/r-help-es</a><br>
<br></blockquote></div><span><font color="#888888"><br><br clear="all"><div><br></div>-- <br>Daniel
</font></span></div>
</blockquote></div></div></div><span><font color="#888888"><br><br clear="all"><div><br></div>-- <br>Jorge Ayuso Rejas<br>
</font></span></div>
</blockquote></div></div></div><span class="HOEnZb"><font color="#888888"><br><br clear="all"><div><br></div>-- <br>Daniel
</font></span></div>
</blockquote></div><br><br clear="all"><div><br></div>-- <br>Jorge Ayuso Rejas<br>
</div>