Group Abstract

Message Boards

WOLFRAM COMMUNITY

7.5K Views

4 Replies

1 Total Like

View groups...

Follow this post

Share this post:

GROUPS:

Mathematica Algebra Wolfram Language

Could you please help me out to get equations from augmented matrix

Muzahoo jee

Posted 11 years ago

Hi, I am trying to derive equations from an augmented matrix, but i'm not been able to, could anyone please help me out to convert these printed equations into real algebraic equations. Regards. Clear[a, b, c, d, e]; For[j = 1, j <= 5, j++, a = RandomInteger[{-5, 5}, {5, 6}]; b = a[[1 ;; 5, 1 ;; 5]]; c = Table[Subscript["x", i], {i, 1, 5}]; d = b.c; e = \!\(\SubscriptBox[\(a\), \(\(\[LeftDoubleBracket]\)\(All, 6\)\(\[RightDoubleBracket]\)\)]\); For[i = 1, i <= 5, i++, Print[ \!\(\SubscriptBox[\(d\), \(\(\[LeftDoubleBracket]\)\(i\)\(\ \[RightDoubleBracket]\)\)]\), " = ", \!\(\SubscriptBox[\(e\), \(\(\[LeftDoubleBracket]\)\(i\)\(\ \[RightDoubleBracket]\)\)]\)];] Print[" "];] the notebook file is also attached. Attachments:*

Hi, I am trying to derive equations from an augmented matrix, but i'm not been able to, could anyone please help me out to convert these printed equations into real algebraic equations. Regards.

Clear[a, b, c, d, e];
For[j = 1, j <= 5, j++,
 a = RandomInteger[{-5, 5}, {5, 6}];
 b = a[[1 ;; 5, 1 ;; 5]];
 c = Table[Subscript["x", i], {i, 1, 5}];
 d = b.c;
 e = 
\!\(\*SubscriptBox[\(a\), \(\(\[LeftDoubleBracket]\)\(All, 
   6\)\(\[RightDoubleBracket]\)\)]\);
 For[i = 1, i <= 5, i++,
   Print[
\!\(\*SubscriptBox[\(d\), \(\(\[LeftDoubleBracket]\)\(i\)\(\
\[RightDoubleBracket]\)\)]\), " = ", 
\!\(\*SubscriptBox[\(e\), \(\(\[LeftDoubleBracket]\)\(i\)\(\
\[RightDoubleBracket]\)\)]\)];]
  Print[" "];]

the notebook file is also attached.