RE:Beginner--How to resolve a simple system of equation

• To: mathgroup at smc.vnet.net
• Subject: [mg69065] RE:Beginner--How to resolve a simple system of equation
• From: abdou.oumaima at hotmail.com
• Date: Tue, 29 Aug 2006 03:26:00 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Hello every body,

To resolve my problem I used this Code for a simple example:
A = {{1 + x, 2 + x}, {3 + 2 x, 1 + 2 x}};
Ainv = Inverse[A];
B = {{1 - x, 1 + 2 x}, {1 + 3 x, 1 + x}};
M = {1, 0};
Print["With LinearSolve "]
LinearSolve[A, B . M]
Series[%, {x, 0, 1}] /. x -> 0
Print["With Inverse "]
Factor[Ainv . B. M]
Series[%, {x, 0, 1}] /. x -> 0

I find the same result from LinearSolve and Inverse Methods and I think that I can use it for and order >2.
What do you think dear math group.
Lian.

Link to the forum page for this post:
http://www.mathematica-users.org/webMathematica/wiki/wiki.jsp?pageName=Special:Forum_ViewTopic&pid=13095#p13095
Posted through http://www.mathematica-users.org [[postId=13095]]

```

• Prev by Date: Re: hatching of the area between two curves?
• Next by Date: a curious answer
• Previous by thread: RE:Beginner--How to resolve a simple system of equation
• Next by thread: General--IF condition in Plot3D