Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2013

[Date Index] [Thread Index] [Author Index]

Search the Archive

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




  • Prev by Date: Re: linux mathematica speed
  • Next by Date: Re: linux mathematica speed
  • Previous by thread: Unable to plot a surface implicitly defined
  • Next by thread: how to define and analyze function with multiple parts