MathGroup Archive 2006

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

Search the Archive

Re: Odd answer from Mathematica

  • To: mathgroup at smc.vnet.net
  • Subject: [mg63622] Re: Odd answer from Mathematica
  • From: "Steve Luttrell" <steve_usenet at _removemefirst_luttrell.org.uk>
  • Date: Sat, 7 Jan 2006 04:59:30 -0500 (EST)
  • References: <dpnrbc$6u1$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

There is a neater way of doing this:

<<NumericalMath`BesselZeros`

BesselJZeros[0,15]

{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}

Steve Luttrell

"Steeve Brechmann (schumi)" <steevebrechmann at yahoo.ca> wrote in message 
news:dpnrbc$6u1$1 at smc.vnet.net...
>
> Hi everyone,
>
>  I was trying to obtain the first five positive roots of the BesselJ[0,x], 
> when something comes out...
>
>  I type :
>
>  Table[{i,FindRoot[BesselJ[0,x]==0,{x,i}]},{i,1,15,2}]//TableForm
>
>  and Mathematica answer that for x=7, it obtains x->-52,6241 !
>
>  Is this a bug ?
>
>  Thanks for your help.
>
>  Steeve Brechmann "Addict to Mathematica"
>
> 



  • Prev by Date: bug in PlotLegend?
  • Next by Date: Re: Getting the small parts right or wrong. Order and Collect
  • Previous by thread: Re: Odd answer from Mathematica
  • Next by thread: Re: Odd answer from Mathematica