MathGroup Archive 2005

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

Search the Archive

Plot difficulties <Error Machine Sized Real Number>


Hello,

I have a question regarding Plot.  Here is a snip of my code:

Plot[function1, {EE,0 ,2.9*1.6 10^-19}, PlotLabel->"function1"];
Plot:: plnr : function1 is not a machine-sized real number at EE = 
6.652531793826348`*^-21
...

function1 evalutates to 0. + 0.00195313i at this point.  In fact, at every 
point the plot command gives an error the evaluation is completly imaginary.

Function1 is composed as follows:

Sqrt[1/(k1 Rc)] Sqrt[1/(k2i Rs)] (k2i m1 Rc Cos[k2i (Rc - Rs)] Sin[k1 Rc] - 
(k1 m2 Rc Cos[k1 Rc] + (m1 - m2) Sin[k1 Rc]) Sin[k2i (Rc - Rs)])/ (m1 
(Sqrt[1/(k2i Rc)] * Sqrt[k1  Rc]  Sqrt[k2i  Rc]  Sqrt[k2i Rs])

Where k2i is completely imaginary, m1>m2, and Rs>Rc

Any Suggestions?

Thanks,
Eric 


  • Prev by Date: Re: spotlight escape sequences
  • Next by Date: Randomness Test
  • Previous by thread: Re: plot3D over a triangular domain
  • Next by thread: Re: Plot difficulties <Error Machine Sized Real Number>