Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2002

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

Search the Archive

Re: ColorFunction TriangularSurfacePlot

  • To: mathgroup at
  • Subject: [mg35396] Re: ColorFunction TriangularSurfacePlot
  • From: Jens-Peer Kuska <kuska at>
  • Date: Thu, 11 Jul 2002 05:24:00 -0400 (EDT)
  • Organization: Universitaet Leipzig
  • References: <aggkjf$ik$>
  • Reply-to: kuska at
  • Sender: owner-wri-mathgroup at


<< DiscreteMath`ComputationalGeometry`
data3D = Table[{x, y} = {Random[], Random[]}; {x, y, Sin[x*y]}, {36}];
gr = TriangularSurfacePlot[data3D];

and the color is obtained by

Show[gr /. Polygon[
        pnts_] :> {SurfaceColor[Hue[Last[Plus @@ pnts/Length[pnts]]]], 


Boris Fain wrote:
> Hi. I am a complete newbie, and I am making surface plots out of sets
> of points in 3-D. I am using TriangleSurfacePlot - a wonderful function
> btw, I gladly junked my own triangulation codes! However, I simply need
> to color the polygons according to their height - or the height of,
> say, the lowest vertex. Actually, any vertex would be just fine. Is
> there a way to do this?
> thanks, boris.

  • Prev by Date: Graphics Question
  • Next by Date: RE: How to display one plot as an inset in another plot?
  • Previous by thread: ColorFunction TriangularSurfacePlot
  • Next by thread: Re: ColorFunction TriangularSurfacePlot