Re: ListContourPlot3D
- To: mathgroup at smc.vnet.net
- Subject: [mg108572] Re: ListContourPlot3D
- From: dh <dh at metrohm.com>
- Date: Wed, 24 Mar 2010 04:40:44 -0500 (EST)
- References: <hoa180$fbh$1@smc.vnet.net>
Hi, you do not have enough data points. As a work around you may e.g. linear interpolate data points by: data = Flatten[({#[[1]], 0.5 (#[[1]] + #[[2]]), #[[2]]}) & /@ Partition[data, 2, 1], 1]; ListContourPlot3D[data, PlotRange -> All, AxesLabel -> {"\[Beta]", "\[Omega]", "Vo"}] or you may use "Interpolation". Daniel On 23.03.2010 10:22, alerodri115 wrote: > Hi, > > I have data in the format data5= { {x1,y1,z1,f1}, > {x2,y2,z2,f2},... }. I would like to see 3D contour lines. > I use the command: > > ListContourPlot3D[data5, PlotRange -> All, > AxesLabel -> {"\[Beta]", "\[Omega]", "Vo"}, Contours -> {4000}] > > and get an empty box with the axes running from -1 to1. > Any help is welcome. > Thank you. > > p.s. here is my data: > > {{200, 20000 10^(1/3), 2000, 1226}, {200, 20000 10^(1/3), 2600, > 1422}, {200, 20000 10^(1/3), 3200, 1581}, {200, 20000 10^(1/3), > 3800, 1761}, {200, 20000 10^(1/3), 4400, 1872}, {400, > 20000 10^(2/3), 2000, 1739}, {400, 20000 10^(2/3), 2600, > 2041}, {400, 20000 10^(2/3), 3200, 2293}, {400, 20000 10^(2/3), > 3800, 2506}, {400, 20000 10^(2/3), 4400, 2689}, {600, 200000, 2000, > 2619}, {600, 200000, 2600, 2939}, {600, 200000, 3200, 3301}, {600, > 200000, 3800, 3610}, {600, 200000, 4400, 4002}, {800, > 200000 10^(1/3), 2000, 3825}, {800, 200000 10^(1/3), 2600, > 4340}, {800, 200000 10^(1/3), 3200, 4902}, {800, 200000 10^(1/3), > 3800, 5389}, {800, 200000 10^(1/3), 4400, 5812}, {1000, > 200000 10^(2/3), 2000, 5731}, {1000, 200000 10^(2/3), 2600, > 6590}, {1000, 200000 10^(2/3), 3200, 7283}, {1000, 200000 10^(2/3), > 3800, 8080}, {1000, 200000 10^(2/3), 4400, 8781}, {1200, 2000000, > 2000, 8463}, {1200, 2000000, 2600, 9911}, {1200, 2000000, 3200, > 11116}, {1200, 2000000, 3800, 12134}, {1200, 2000000, 4400, > 13006}, {1400, 2000000 10^(1/3), 2000, 12840}, {1400, > 2000000 10^(1/3), 2600, 14567}, {1400, 2000000 10^(1/3), 3200, > 16255}, {1400, 2000000 10^(1/3), 3800, 18012}, {1400, > 2000000 10^(1/3), 4400, 19564}, {1600, 2000000 10^(2/3), 2000, > 19125}, {1600, 2000000 10^(2/3), 2600, 21820}, {1600, > 2000000 10^(2/3), 3200, 24349}, {1600, 2000000 10^(2/3), 3800, > 26890}, {1600, 2000000 10^(2/3), 4400, 28671}, {1800, 20000000, > 2000, 28602}, {1800, 20000000, 2600, 32915}, {1800, 20000000, 3200, > 36394}, {1800, 20000000, 3800, 40242}, {1800, 20000000, 4400, > 43164}, {2000, 20000000 10^(1/3), 2000, 42320}, {2000, > 20000000 10^(1/3), 2600, 47587}, {2000, 20000000 10^(1/3), 3200, > 46494}, {2000, 20000000 10^(1/3), 3800, 39791}, {2000, > 20000000 10^(1/3), 4400, 41156}, {2200, 20000000 10^(2/3), 2000, > 36822}, {2200, 20000000 10^(2/3), 2600, 27555}, {2200, > 20000000 10^(2/3), 3200, 20190}, {2200, 20000000 10^(2/3), 3800, > 47053}, {2200, 20000000 10^(2/3), 4400, 34705}} > -- Daniel Huber Metrohm Ltd. Oberdorfstr. 68 CH-9100 Herisau Tel. +41 71 353 8585, Fax +41 71 353 8907 E-Mail:<mailto:dh at metrohm.com> Internet:<http://www.metrohm.com>