       Re: Solving the variable system of equations

• To: mathgroup at smc.vnet.net
• Subject: [mg49318] Re: Solving the variable system of equations
• From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
• Date: Tue, 13 Jul 2004 06:00:03 -0400 (EDT)
• Organization: Universitaet Leipzig
• References: <cd078l\$9hi\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Hi,

try

FindRoot[F==0,Transpose[{X,S}]]

Regards
Jens

Mukhtar wrote:
>
> Suppose I have n functions f[X,i], i=1,...,n, where X is a vector of
> x's.  Is there a way to program in mathematica such that I get
> solutions, vector X, of f[X,i]==0, i=1,...,n for different n's.
>
> For example, if n=2 then I have two functions f[{x1,x2},1] and
> f[{x1,x2},2] and can set both of them to zero and solve for {x1,x2}.
> If n=3 then I would have three functions f[{x1,x2,x3},1],
> f[{x1,x2,x3},3], and f[{x1,x2,x3},3] and solve for {x1,x2,x3}.
>
> My problem is that I can setup the problem using matrices, i.e. just
> define some matrix F=Table[f[X,i],{i,1,n}] and X=Table[x[i],{i,1,n}],
> however, to use FindRoot I need to specify starting variables.  I
> created a matrix of starting variables, say S=Table[i,{i,1,n}],
> however Mathematica does not want to accept FindRoot[F==0,{X,S}].
>