Maple - linear algebra

(67)

(70)

b:=<1,8,5,6>

LinearSolve(P,b)

A:=Matrix([[ 1 , 1 , 1 ],
[ 2 , 2 , -1 ],
[ -1 , -1 , 2 ]]);

b1:=Vector[column]([ 1 ,
2 ,
-1 ]);

b2:=Vector[column]([ 1 ,
2 ,
3 ]);

LinearSolve(A,b1) #nekonecne mnoho reseni

>

(79)

(71)

>

(76)

(77)

(75)

>

>

(40)

(17)

(78)

>

(55)

(72)

>

>

(28)

>

(74)

(49)

>

>

>

(4)

>

(64)

(70)

>

(73)

LinearSolve(A,b2); # toto vyhodi maple pri neexistujícím reseni

Error, (in LinearAlgebra:-LinearSolve) inconsistent system

Rank(A)

2

#vytvoreni rozsirene matice
novaMatice:=

Rank(novaMatice)

3

r1:=x+x2+x3=1

r2:=2*x1+2*x2-x3=2

r3:=-x1-x2+2*x3

A,b:=GenerateMatrix([r1,r2,r3],[x1,x2,x3])

LinearSolve(A,b)

solve([r1,r2,r3],[x1,x2,x3])