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>
- Reply-to: kuska at informatik.uni-leipzig.de
- 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}].
>
> Please advise. Thanks, Mukhtar