MathGroup Archive 2010

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

Search the Archive

Re: texture for filling?


on a first glance it seems the Filling can not provide such things.
Knowing a bit of the inside of the created Graphics object (and you get
this inside by looking at the InputForm of your created plot) leads to:

p = Normal[
  Plot[{Sin[x], Cos[x]}, {x, 0, 2 Pi}, PlotStyle -> Thick, 
   Filling -> {1 -> {{2}, Lighter[Gray]}}]]
tex = Texture[ExampleData[{"ColorTexture", "FloralPattern1"}]];
p /. Polygon[pointset_] :> {tex, 
   Polygon[pointset, VertexTextureCoordinates -> pointset]}

Hope this helps,


On Wed, 2010-12-29 at 05:56 -0500, agua wrote:
> Greetings to all.
> It is possible that instead of using color, apply
> some texture to fill an area between two curves.
> For example, fill the region with slanted lines or dots instead of
> gray:
> Plot[{Sin[x], Cos[x]}, {x, 0, 2 Pi}, Filling -> {1 -> {{2},
> Lighter[Gray]}}]
> Tk.

  • Prev by Date: Re: Wolfram free input shortcut is "cntrl ="
  • Next by Date: Re: texture for filling?
  • Previous by thread: texture for filling?
  • Next by thread: Re: texture for filling?