Re: Displaying Solution in Matrix Form
- To: mathgroup at smc.vnet.net
- Subject: [mg61406] Re: Displaying Solution in Matrix Form
- From: "mathematica newbie" <sheeba.arnold at gmail.com>
- Date: Tue, 18 Oct 2005 02:44:54 -0400 (EDT)
- References: <diskq0$m9f$1@smc.vnet.net><divgkj$g2d$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Thank you very much for the reply!
I'm still confused as to how this works if i and j are suffixes.
i.e., The equations are of the form fi,j (i and j are written as
subscripts of f)
Steve Luttrell wrote:
> This does what you want (using a randomly generated example):
>
> variables=Flatten[Table[f[i,j],{i,3},{j,4}]];
> matrix=Table[Random[Real,{-1,1}],{12},{12}];
> vector=Table[Random[Real,{-1,1}],{12}];
> equations=MapThread[#1==#2&,{matrix.variables,vector}]
> solution=NSolve[equations,variables]
> Partition[variables,4]//TableForm
> Partition[variables/.solution[[1]],4]//TableForm
>
> The solution is in the form of a set of replacement rules for the variables.
> You use the variables /.solution construct to apply these rules to the
> variables, and then use Partition to split the vector of solutions into a
> matrix, which you then display using TableForm (you could use MatrixForm if
> you want brackets drawn round the table).
>
> Steve Luttrell
>
> "mathematica newbie" <sheeba.arnold at gmail.com> wrote in message
> news:diskq0$m9f$1 at smc.vnet.net...
> > Hi,
> >
> > I have the 12 linear algebraic equations.
> > The solutions are denoted by Fi, j's.
> > F1,1 , F1,2, F1,3, F1,4,
> > F2,1, F2,2 etc......through F3,4
> >
> > I have solved the equations with the NSolve command.
> >
> > How can I display this result as a 3x4 matrix, using the solution to
> > assign values to the 12 Fi, j's.
> >
> > This must be done in a nested
> > input that includes the function that solves the equations.
> >
> > I'm a mathematica newbie and any help with this is greatly appreciated.
> > Thank you!
> >