Group Abstract Group Abstract

Message Boards Message Boards

0
|
7.3K Views
|
3 Replies
|
0 Total Likes
View groups...
Share
Share this post:

Help with Bessel Function

Posted 11 years ago

I need help solving for a variable in modifed bessel function of the second kind and I have no idea. Can anyone help? Below is the equation and and what I've put in Mathematica.

enter image description here

I need to solve for K. d = 0.000012401 a = 0.0382

solve[0.5 + ((2 [Sqrt]x)/0.000012401) (BesselK[1, (0.000012401/(2 [Sqrt]x))]/BesselK[0, (0.000012401/(2 [Sqrt]x))]) == 1/(4*0.0382), x]

POSTED BY: D Moore
3 Replies
Posted 11 years ago

Thanks so much

POSTED BY: D Moore

kn is a modified Bessel function of the third kind, proportional to K{n+1/2). Also Sqrt is coded incorrectly. Here's what I get for numerical solution of your problem:

In[14]:= d = 0.000012401; a = 0.0382;
FindRoot[0.5 + ((2 Sqrt[x])/
      0.000012401) (BesselK[3/2, (0.000012401/(2 Sqrt[x]))]/
      BesselK[1/2, (0.000012401/(2 Sqrt[x]))]) == 
  1/(4*0.0382), {x, .1}]

Out[15]= {x -> 1.55154*10^-10 - 9.43222*10^-21 I}

In[16]:= Chop[%]

Out[16]= {x -> 1.55154*10^-10}
POSTED BY: S M Blinder
Posted 11 years ago
POSTED BY: Michael Helmle
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard