> On 09/30/2011 09:23 AM, Lorena Muñoz wrote:
> > Hola a todos: Trato de sombrear la zona comprendida por estas dos
> > funciones en coordenadas polares y de calcular el área de la región
> > pero no lo puedo lograr (si puedo en otro tipo de funciones):
> > load(draw)$
> > draw2d(user_preamble = "set grid polar",
> > nticks = 200,
> > color = blue,
> > line_width = 3,
> >
> > polar(3,theta,0,2*%pi),polar(2+2*cos(theta),theta,0,2*%pi));
> > Estoy empezando con esto y quería agradecerles nuevamente la pronta
> > respuesta que le dieron a mi anterior pregunta. Lorena.
> >

A mi se me ocurre otra solución, no obstante hay que llevar las ecuaciones a cartesianas:

wxdraw2d(
x_voxel = 30,
y_voxel = 30,
region(sqrt(x^2+y^2)<=3 and x^2+y^2>=2*sqrt(x^2+y^2)+2*x,x,-3,3,y,-3,3)
);