Problems using TWJ contour for irregular data

*To*: mathgroup at smc.vnet.net*Subject*: [mg13204] Problems using TWJ contour for irregular data*From*: Joel Cannon <cannon at alpha.centenary.edu>*Date*: Mon, 13 Jul 1998 07:42:53 -0400*Sender*: owner-wri-mathgroup at wolfram.com

Does anyone have experience using Tom Wickham-Jones contour function for generating contour plots from irregularly spaced data (using M3.0)? I have downloaded the new version of the ExtendGraphics from MathSource and put the suffix .exe on the binary file compiled with mcc. However, I am unable to duplicate the example found on page 483 of the book. I will attempt to past the results out of the notebook below. When calling either TrianglePlot or ListContourPlot, I get an error message printed to the shell that launched mathematica saying, "Assertion failed: FALSE, file delaunay.tm.c, line 198". Thanks for any help you all can provide. In[1]:= Needs["ExtendGraphics`Contour`"] In[2]:= Links[] Out[2]= {LinkObject["ParentLink",1,1],LinkObject["'/usr/local/mathematica/AddOns/Applications/ExtendGraphics/delaunay.exe'",2,2],LinkObject["'/usr/local/mathematica/AddOns/Applications/ExtendGraphics/contour.exe'",3,3]} (* Generate an irregularly spaced array of x,y,z points *) d1 = Flatten[ Table[ Table[{r,Sin[t],r^2 Cos[t] Sin[t]}, {t,0,2Pi-2Pi/(10r),2Pi/(10 r)}], {r,10}],1]; In[4]:= Dimensions[d1] Out[4]= {550,3} (* Attempt a TrianglePlot with the data *) In[5]:= TrianglePlot[Map[Take[#,2]&,d1]] LinkObject::"linkd": "\!\(\\[LeftSkeleton] 1 \\[RightSkeleton]\) is closed; the connection is dead." Set::"shape": "Lists \!\({ExtendGraphics`Delaunay`Private`hull, \(\\[LeftSkeleton] 35 \\[RightSkeleton]\)}\) and \!\($Failed\) are not the same shape." Graphics::"gprim": "Unknown \!\(Graphics\) primitive \!\(ExtendGraphics`Delaunay`Private`tri\) encountered." Out[5]= \[SkeletonIndicator]Graphics\[SkeletonIndicator] (* Attempt to use ListContourPlot *) In[3]:= c = ListContourPlot[d1] LinkObject::"linkd": "\!\(\\[LeftSkeleton] 1 \\[RightSkeleton]\) is closed; the connection is dead." ------------------------------------------------------------------------------ Joel W. Cannon | (318)869-5160 Dept. of Physics | (318)869-5026 FAX Centenary College of Louisiana | P. O. Box 41188 | Shreveport, LA 71134-1188 |