[Date Index]
[Thread Index]
[Author Index]
Re: Help plotting P(x,y,z) = Aexp[r^2]
*To*: mathgroup at smc.vnet.net
*Subject*: [mg97839] Re: [mg97816] Help plotting P(x,y,z) = Aexp[r^2]
*From*: Bob Hanlon <hanlonr at cox.net>
*Date*: Mon, 23 Mar 2009 04:04:20 -0500 (EST)
*Reply-to*: hanlonr at cox.net
P[A_][x_, y_, z_] := A*Exp[x^2 + y^2 + z^2];
Partition[
With[{A = 2, m = 1},
Table[Plot3D[P[A][x, y, z], {x, 0, m}, {y, 0, m},
PlotRange -> {0, P[A][m, m, m]}], {z, 0, m, m/11}]], 3] // Grid
With[{m = 1},
Manipulate[
Plot3D[P[A][x, y, z], {x, 0, m}, {y, 0, m},
PlotRange -> {0, P[A][m, m, m]}], {A, 0.5, 1.5}, {z, 0, m}]]
Bob Hanlon
---- "dylankrishnan at gmail.com" <dylankrishnan at gmail.com> wrote:
=============
where r^2 = x^2 + y^2 + z^2 and A is a constant.
I thought this would be simple until I realized mathematica doesnt
like three inputs ( to my knowledge)
I've been trying to plot this for the last few days, but have had no
luck getting it to work using version 7.
Any help getting started would be greatly appreciated!
Prev by Date:
**Re: partial differential equation aolving difficulties**
Next by Date:
**Re: partial differential equation aolving difficulties**
Previous by thread:
**Re: Help plotting P(x,y,z) = Aexp[r^2]**
Next by thread:
**Re: Help plotting P(x,y,z) = Aexp[r^2]**
| |