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[..]]