RE: 3D plots

*To*: mathgroup at smc.vnet.net*Subject*: [mg67340] RE: [mg67218] 3D plots*From*: "David Park" <djmp at earthlink.net>*Date*: Sun, 18 Jun 2006 05:13:56 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Jose, I made a plot using my DrawGraphics package. I had to use several of the commands to trim the surfaces to the domain on which they are defined. I am attaching a .gif image of one view of the two surfaces. I am also attaching the notebook I used to make the plot. (These are omitted from the MathGroup response. Anyone interested can contact me.) If you don't have DrawGraphics you won't be able to make the plots but you can see some of the other steps. (The notebook uses the style sheet from my web site, but you can let it go to the Default style.) Basically what I did was first pad the data to fit the entire rectangle. I did this by making the values constant outside the triangular region taking the closest values in the y direction. I then interpolated a fit to the upper and lower data points. I then used a feature of DrawGraphics where I create a grid of rectangular polygons and then trimmed them to fit the triangular region. Then I used another feature that will raise the grid to a 3D surface. I did this for each of the two surfaces. That gives one surface above the other. You could rotate it with SpinShow to get a better view of it. Because there are two surfaces involved and because they are only defined over a restricted domain, I think it would be difficult to make a plot that clearly showed the two surfaces with regular Mathematica. David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: qfwfq [mailto:qfwfq_0 at yahoo.com] To: mathgroup at smc.vnet.net Hi David, Thank you for your response. Zmax is always greater than zmin. x_coord is always greater than y_coord. Next, I send you a piece of the list. Thanks Jose {{0.2,0.1,2.12896,2.26061}, {0.3,0.2,2.12896,3.28811}, {0.4,0.2,4.25792,4.52123}, {0.4,0.3,2.12896,4.31561}, {0.5,0.3,4.25792,5.54873}, {0.5,0.4,2.12896,5.34311}, {0.6,0.3,6.38688,6.78184}, {0.6,0.4,4.25792,6.57622}, {0.6,0.5,2.12896,6.37061}, {0.7,0.4,6.38688,7.80934}, {0.7,0.5,4.25792,7.60372}, {0.7,0.6,2.12896,7.39811}, {0.8,0.4,8.51584,9.04245}, {0.8,0.5,6.38688,8.83684}, {0.8,0.6,4.25792,8.63122}, {0.8,0.7,2.12896,8.42561}, {0.9,0.5,8.51584,10.07}, {0.9,0.6,6.38688,9.86434}, {0.9,0.7,4.25792,9.65872}, {0.9,0.8,2.12896,9.4531}, {1.,0.5,10.6448,11.3031}, {1.,0.6,8.51584,11.0975}, {1.,0.7,6.38688,10.8918}, {1.,0.8,4.25792,10.6862}, {1.,0.9,2.12896,10.4806}, {1.1,0.6,10.6448,12.3306}, {1.1,0.7,8.51584,12.1249}, {1.1,0.8,6.38688,11.9193}, {1.1,0.9,4.25792,11.7137}, {1.1,1.,2.12896,11.5081}, {1.2,0.6,12.7738,13.5637}, {1.2,0.7,10.6448,13.3581}, {1.2,0.8,8.51584,13.1524}, {1.2,0.9,6.38688,12.9468}, {1.2,1.,4.25792,12.7412}, {1.2,1.1,2.12896,12.5356}, {1.3,0.7,12.7738,14.5912}, {1.3,0.8,10.6448,14.3856}, {1.3,0.9,8.51584,14.1799}, {1.3,1.,6.38688,13.9743}, {1.3,1.1,4.25792,13.7687}, {1.3,1.2,2.12896,13.5631}, {1.4,0.7,14.9027,15.8243}, {1.4,0.8,12.7738,15.6187}, {1.4,0.9,10.6448,15.4131}, {1.4,1.,8.51584,15.2074}, {1.4,1.1,6.38688,15.0018}, {1.4,1.2,4.25792,14.7962}, {1.4,1.3,2.12896,14.5906}, {1.5,0.7,17.0317,17.0574}, {1.5,0.8,14.9027,16.8518}, {1.5,0.9,12.7738,16.6462}, {1.5,1.,10.6448,16.4406}, {1.5,1.1,8.51584,16.2349}, {1.5,1.2,6.38688,16.0293}, {1.5,1.3,4.25792,15.8237}, {1.5,1.4,2.12896,15.6181}}