Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2000
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2000

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

Search the Archive

Re: Bessel J0 zeros

  • To: mathgroup at smc.vnet.net
  • Subject: [mg21778] Re: [mg21739] Bessel J0 zeros
  • From: BobHanlon at aol.com
  • Date: Thu, 27 Jan 2000 22:56:59 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Works fine on my PowerMac with v3.0

$Version

"Power Macintosh 3.0 (May 6, 1997)"

Needs["NumericalMath`BesselZeros`"]

Table[BesselJZeros[0, n], {n, 8}]

{{2.40483},{2.40483,5.52008},{2.40483,5.52008,8.65373},{2.40483,5.52008,
    8.65373,11.7915},{2.40483,5.52008,8.65373,11.7915,14.9309},{2.40483,
    5.52008,8.65373,11.7915,14.9309,18.0711},{2.40483,5.52008,8.65373,11.7915,
    14.9309,18.0711,21.2116},{2.40483,5.52008,8.65373,11.7915,14.9309,18.0711,
    21.2116,24.3525}}

BesselJZeros[0, 30]//Timing

{0.666667 Second,{2.40483,5.52008,8.65373,11.7915,14.9309,18.0711,21.2116,
    24.3525,27.4935,30.6346,33.7758,36.9171,40.0584,43.1998,46.3412,49.4826,
    52.6241,55.7655,58.907,62.0485,65.19,68.3315,71.473,74.6145,77.756,
    80.8976,84.0391,87.1806,90.3222,93.4637}}

Bob Hanlon

In a message dated 1/26/2000 5:12:44 AM, brambilla.roberto at sri.enel.it writes:

>I'm using Mathematica 3.0 and I have found a strange behaviour
>of standard package BesselZeros :
>
>BesselJZeros[0,2] works
>BesselJZeros[0,k] k=3,4,5,6  does not work at all
>BesselJZeros[0,k] k=7,8... works again 
>
>(and very well BesselJZero[0,30] in 3.2 sec).
>
>so no problem : "ubi maior minor cessat".
>Can anyone explain me this incongrous fact ?
>


  • Prev by Date: Re: Saving
  • Next by Date: Re: Making a function dynamically define another conditional function...
  • Previous by thread: Re: Bessel J0 zeros
  • Next by thread: Q: Underscript and Symbol