Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2007
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2007

[Date Index] [Thread Index] [Author Index]

Search the Archive

graphics

  • To: mathgroup at smc.vnet.net
  • Subject: [mg75860] graphics
  • From: dimitris <dimmechan at yahoo.com>
  • Date: Sat, 12 May 2007 03:04:24 -0400 (EDT)

Hello.

I have

In[254]:=
surf = Block[{$DisplayFunction = Identity}, ParametricPlot[{5*Cos[u],
Sin[u]}, {u, 0, 2*Pi}, Axes -> None,
     PlotStyle -> Thickness[0.02], PlotPoints -> 100]];
halfspa = Graphics[{Thickness[0.01], Circle[{0, 0}, 5, {Pi, 2*Pi}]}];

Then

In[242]:=
gr1 = surf /. Line[x_] :> {GrayLevel[0.9], Polygon[x]};

In[256]:=
Show[surf, gr1];

and the ellipse surf is filled with gray color how I want.

Next

In[258]:=
gr2 = halfspa /. Line[x_] :> {GrayLevel[0.9], Polygon[x]};

In[259]:=
Show[halfspa, gr2];

The half circle is not filled with gray color.
Why?
Can somebody point me out a workaround?

Thanks

Dimitris



  • Prev by Date: v.6 Manipulate
  • Next by Date: Re: Making sense of Directive[ ]
  • Previous by thread: v.6 Manipulate
  • Next by thread: Re: graphics