Re: four dimensional plot
- To: mathgroup at smc.vnet.net
- Subject: [mg91514] Re: four dimensional plot
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Mon, 25 Aug 2008 05:05:13 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <g8rfei$f9h$1@smc.vnet.net>
shingo wrote:
> Hi guys. I have some troubles in plotting.
> I'd like to plot the value of the function $f(x,y,z)$. This function
> $f$ can be evaluated only by numerically. I tried to use the built-in
> function "ListContourPlot3D", but it didn't work well. If you have any
> advices, please give it to me. Thanks in advance.
You can generate a list of quadruples with Table[], then Flatten it to
get a list in the required format {{x, y, z, f[x, y, z]}, ...}. For
instance,
f[x_, y_, z_] := x^2 + y^2 - z^2 + RandomReal[0.1]
pts = Flatten[
Table[{x, y, z, f[x, y, z]}, {x, -2, 2, 0.2}, {y, -2, 2,
0.2}, {z, -2, 2, 0.2}], 1];
ListContourPlot3D[pts, Contours -> {0}, Mesh -> None]
Regards,
-- Jean-Marc