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

MathGroup Archive 2007

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

Search the Archive

Re: DelaunayTriangulation[] output

  • To: mathgroup at
  • Subject: [mg83218] Re: DelaunayTriangulation[] output
  • From: Frank Iannarilli <frankeye at>
  • Date: Thu, 15 Nov 2007 05:39:04 -0500 (EST)
  • References: <fhegn1$m6p$>

On Nov 14, 4:55 am, Dominick <pd20012... at> wrote:
Hi Dominick,

I used the following functions and command sequence (they worked in
Mathematica 5.2, I presume they'll still work in 6).  In below,


The following function works (for all but the 1st vertex, which yields
bogus facet {1, deltri[[1,2,-1]], 2})

For[i=1,i<=Length[list],i++,If[(list[[1]]> base &&list[[2]]> base),

A quick test of makeFacets[]:

In: makeFacets[{20,{43,19,1,21,44}}]
Out:  {{20,21,44},{20,44,43}}


"facets" will be a list of triangles (each a list of 3 vertex indices)

Good luck

  • Prev by Date: Message: "Numerical interation converging too slowly"
  • Next by Date: Re: Solving simple equations
  • Previous by thread: DelaunayTriangulation[] output
  • Next by thread: Re: DelaunayTriangulation[] output