Re: Unable to plot a surface implicitly defined
- To: mathgroup at smc.vnet.net
- Subject: [mg130550] Re: Unable to plot a surface implicitly defined
- From: Peter Pein <petsie at dordos.net>
- Date: Sat, 20 Apr 2013 05:45:10 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
- References: <kkqjru$no9$1@smc.vnet.net>
Am 19.04.2013 07:14, schrieb Pablo de la Hoz: > I have the following function: > > X1 = Function[{r, \[Theta], l}, > 4 Re[(N[Integrate[ > E^(-(r^2 + R^2) + 2 I R l/r) (r + I R)^( > 2 l) (LaguerreL[1/2 (-l + n), > l, (r^2 + R^2)])^2 , {R, -\[Infinity], \[Infinity]}]])]]; > > where the function is constant in \[Theta], this function defines a > surface > (more or less cylindrical) through the equation X1(r, \[Theta], > l)=0.08, let's say. > > Problem is that I'm unable to draw it neither with the commands: > ContourPlot3D, ListContourPlot3D. > > I have spent days trying without solution. > > I would be very glad is someone is able to help solve this problem. > > Regards, > > Pablo > just two ideas before I try this on my box: Has n got a value? NIntegrate is usually faster than N[Integrate[..]]