Re: plotting complex functions in (x,y,t) space
- To: mathgroup at smc.vnet.net
- Subject: [mg131796] Re: plotting complex functions in (x,y,t) space
- From: Bob Hanlon <hanlonr357 at gmail.com>
- Date: Mon, 7 Oct 2013 08:23:41 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-outx@smc.vnet.net
- Delivered-to: mathgroup-newsendx@smc.vnet.net
- References: <20131006074734.D77A66A1D@smc.vnet.net>
One approach:
f[x_, y_, t_] = Sqrt[x^2 + y^2 + t^2]*Exp[I*t];
Module[{func,
xmin = -1, ymin = -1, tmin = -1,
xmax = 1, ymax = 1, tmax = 1,
xstep = .1, ystep = .1, tstep = .1},
Graphics3D[
Flatten[
Table[
{Hue[Arg[func = f[x, y, t]]],
Opacity[1 - Abs[func]],
EdgeForm[],
Cuboid[{x, y, t},
{x + xstep, y + ystep, t + tstep}]},
{x, xmin, xmax - xstep, xstep},
{y, ymin, ymax - ystep, ystep},
{t, tmin, tmax - tstep, tstep}]],
Axes -> True,
AxesLabel -> (Style[#, 18] & /@
{"x", "y", "t"})]]
Bob Hanlon
On Sun, Oct 6, 2013 at 3:47 AM, Michael B. Heaney <mheaney at alum.mit.edu>wrote:
>
> Hi,
>
> I'd like to plot, on [x,y,t] axes, a complex function F[x,y,t], with the
> magnitude of F represented by opacity, and the phase of F represented by
> color. Does anyone have suggestions on how best to do this?
>
> Thanks,
>
> Michael
>
>
>
- References:
- plotting complex functions in (x,y,t) space
- From: "Michael B. Heaney" <mheaney@alum.mit.edu>
- plotting complex functions in (x,y,t) space