Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: Filling problem in Plot3D

  • To: mathgroup at smc.vnet.net
  • Subject: [mg87402] Re: Filling problem in Plot3D
  • From: "David Park" <djmpark at comcast.net>
  • Date: Wed, 9 Apr 2008 05:58:27 -0400 (EDT)
  • References: <ftfeb3$bn7$1@smc.vnet.net>

Filling in 3D appears to work only if filling to a value is specified and 
not filling to another surface. One method might be to fill both surfaces to 
a constant intermediate value but that introduces an extra plane surface at 
the intermediate value!

Plot3D[{.3 + .3 x, 2 + Sin[x y]}, {x, 0, 1}, {y, 0, 1},
 BoxRatios -> 1, Mesh -> False, PlotStyle -> RGBColor[0, 1, 0, .5],
 PlotRange -> {{0, 1}, {0, 1}, {0, Automatic}},
 PlotRangePadding -> 0.1,
 FillingStyle -> {RGBColor[1, 0, 0, .5]},
 Filling -> {1 -> 1, 2 -> 1}]

So there seems to be a lack of functionality in filling between two 
surfaces.

-- 
David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/


"zac" <replicatorzed at gmail.com> wrote in message 
news:ftfeb3$bn7$1 at smc.vnet.net...
> Dear group,
>
> consider the following 3D graphic in v6, with two surfaces:
>
> Plot3D[{.3, .7}, {x, 0, 1}, {y, 0, 1},
> BoxRatios -> 1,
> Mesh -> False,
> PlotStyle -> RGBColor[0, 1, 0, .5],
> PlotRange -> {{0, 1}, {0, 1}, {0, 1}},
> FillingStyle -> {RGBColor[1, 0, 0, .5]},
> Filling -> {1 -> {2}}
> ]
>
> There should be some filling between the two surfaces, but no filling
> is displayed at all.
> Of course I can fill with Filling -> {1 -> .7}, but what if the target
> surface is not planar?
> Any suggestions?
>
> Version: 6.0 for Microsoft Windows (32-bit)
>
> Istvan Zachar
> 



  • Prev by Date: Re: Just primitive ColorFunction
  • Next by Date: Trace'ing Gradient in FindMinimum
  • Previous by thread: Re: Filling problem in Plot3D
  • Next by thread: Just primitive ColorFunction