MathGroup Archive 2005

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

Search the Archive

Plotting symbolic representation of numerica function


Hello.  I need to plot solutions to system of equations solved using
numerical functions.  I tried:

{f1[(x_)?NumericQ],f2[(x_)?NumericQ]}:={f1,f2}/.FindRoot[{g1[f1,f2,x]==0,g2[f1,f2,x]==0},{f1,0},{f2,0}][[1]]
Plot[Evaluate[{f1[x],f2[x]},{x,x0,x1}]

where g1,g2 are some functions and x0,x1 some starting variables.  I
get an error message SetDelayed::shape : Lists
{f1[x_?NumericQ],f2[x_?NumericQ]} and {f1,f2} are not the same shape.
I suspect that there is something wrong with SetDelayed because using
Set and Solve plots functions, yet SetDelayed and Solve generates the
same message as SetDelayed and FindRoot.

I do not understand what is wrong and help file is not useful as it
does not contain examples with SetDelayed for several variables.

Mukhtar Bekkali


  • Prev by Date: Re: 2+ D wave equation
  • Next by Date: real telescopic sum becomes complex?
  • Previous by thread: Re: 2+ D wave equation
  • Next by thread: Re: Plotting symbolic representation of numerica function