Re: TriangularSurfacePlot

[Jens-Peer Kuska <kuska@XXXXXXX.de>]

Hallo,

Mesh->False *kann* garnicht funktionieren, denn es ist
ja eben kein Gitter ! sondern ein gew"ohnliches Graphiks3D[]
Objekt mit Polygonen, deren outlines man mit EdgeForm[] setzt.

Needs["DiscreteMath`ComputationalGeometry`"]

dat = Table[
        (x = Random[]; y = Random[]; 
        {Pi*x, Pi*y, Sin[Pi^2*x*y]}), 
        {64}];

plt = TriangularSurfacePlot[dat, DisplayFunction -> Identity];
Show[Graphics3D[{EdgeForm[], plt[[1]]}]];

Gruss
  Jens

Dirk Eling wrote:
> 
> hallo,
> 
> ich wuerde gerne wissen, wie ich mit mathematica 4.0 bei einem
> TriangularSurfacePlot die
> dreieckskanten verschwinden lasse. Mesh->False funktioniert nicht.
> 
> gruss
> dirk