Re: Displaying Solution in Matrix Form
- To: mathgroup at smc.vnet.net
- Subject: [mg61367] Re: [mg61335] Displaying Solution in Matrix Form
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Mon, 17 Oct 2005 02:29:31 -0400 (EDT)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
Clear[F];
var=Flatten[Array[F,{3,4}]];
eqns=Thread[Table[Random[],{12},{12}].var==Table[Random[],{12}]];
F=Partition[var/.NSolve[eqns,var][[1]],3]
{{0.22245209976921965, -0.6879632938162827, -0.3515175961033865},
{0.8055186134912115, -0.4567052693128085, 0.5421511793408135},
{0.7396272893299066, 0.8487900146795265, -0.8927126924057154},
{-0.6061412003926252, 0.48967392351033107, 0.8155749042239686}}
F[[2,3]]
0.5421511793408135
Bob Hanlon
>
> From: "mathematica newbie" <sheeba.arnold at gmail.com>
To: mathgroup at smc.vnet.net
> Date: 2005/10/16 Sun AM 12:17:51 EDT
> Subject: [mg61367] [mg61335] Displaying Solution in Matrix Form
>
> 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!
>
>