MathGroup Archive 2006

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

Search the Archive

Re: Plot3D help please

  • To: mathgroup at smc.vnet.net
  • Subject: [mg68214] Re: [mg68174] Plot3D help please
  • From: "Chris Chiasson" <chris at chiasson.name>
  • Date: Sat, 29 Jul 2006 01:00:47 -0400 (EDT)
  • References: <200607270929.FAA23662@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

rep[1]={func[x_,y_]/;x^2+y^2\[LessEqual]2^2->{x,y,-(x^2+y^2)},
    func[x_,y_]->Sequence[]}

xpr[1]=Flatten[Table[{x,y},{x,-2,2,1/10},{y,-2,2,1/10}],1]; (*square domain -
    I'm sure you can come up with a better sampling scheme*)

xpr[2]=func@@@xpr[1]/.rep[1]; (*surface coordinate triples on limited domain*)

<<DiscreteMath`ComputationalGeometry`

plt[1]=TriangularSurfacePlot[xpr[2],PlotRange->All,Axes->True,
    AxesLabel->{x,y,z}]

On 7/27/06, 1156 <rob at piovere.com> wrote:
> Hi, I'd like to use Plot3D where the range of two independent variables
> interact. That is, in the example below I'd like to specify the range of
> td and have the other variable's range be dependent upon td. All this
> because the variable tw must always be less or equal to td for the
> function rh to make sense. rh has been previously defined in terms of td
> and tw.
>
> Plot3D[rh, {td, 20, 30}, {tw, td - 5, td}]
>
> I would appreciate any tips on how to pull this off.
>
>


-- 
http://chris.chiasson.name/


  • Prev by Date: Re: Block v. Module
  • Next by Date: Re: Block v. Module
  • Previous by thread: Plot3D help please
  • Next by thread: Re: Plot3D help please