Re: Plotting symbolic representation of numerica function

• To: mathgroup at smc.vnet.net
• Subject: [mg54441] Re: [mg54360] Plotting symbolic representation of numerica function
• From: Chris Chiasson <chris.chiasson at gmail.com>
• Date: Sun, 20 Feb 2005 00:10:26 -0500 (EST)
• References: <200502190732.CAA06061@smc.vnet.net>
• Reply-to: Chris Chiasson <chris.chiasson at gmail.com>
• Sender: owner-wri-mathgroup at wolfram.com

```Off the top of my head, I could not tell you what is going wrong. If
you would post the definition of the function you are trying to plot,
I might be able to figure out (through running your code and looking
at the output) what is wrong.
Regards,

On Sat, 19 Feb 2005 02:32:07 -0500 (EST), mbekkali <mbekkali at gmail.com> wrote:
> 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
>
>

--
Chris Chiasson
Kettering University
Mechanical Engineering