matrice7
(* crea matrice diagonale *)
diagonale=DiagonalMatrix[{a,b,c}]
MatrixForm[diagonale]
TableForm[diagonale]
{{a, 0, 0}, {0, b, 0}, {0, 0, c}}
;[o]
{{a, 0, 0}, {0, b, 0}, {0, 0, c}}
MatrixForm[{{a, 0, 0}, {0, b, 0}, {0, 0, c}}]
;[o]
a 0 0
0 b 0
0 0 c
TableForm[{{a, 0, 0}, {0, b, 0}, {0, 0, c}}]
;[o]
a 0 0
0 b 0
0 0 c
(* crea matrice identita' *)
identita=IdentityMatrix[3]
MatrixForm[identita]
{{1, 0, 0}, {0, 1, 0}, {0, 0, 1}}
;[o]
{{1, 0, 0}, {0, 1, 0}, {0, 0, 1}}
MatrixForm[{{1, 0, 0}, {0, 1, 0}, {0, 0, 1}}]
;[o]
1 0 0
0 1 0
0 0 1
(* crea matrici zero *)
zero=Table[0,{3},{3}]
MatrixForm[zero]
{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}
;[o]
{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}
MatrixForm[{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}]
;[o]
0 0 0
0 0 0
0 0 0
(* crea matrice triangolare *)
triangolare=Table[If[i<=j,x,0],{i,3},{j,3}]
MatrixForm[triangolare]
{{x, x, x}, {0, x, x}, {0, 0, x}}
;[o]
{{x, x, x}, {0, x, x}, {0, 0, x}}
MatrixForm[{{x, x, x}, {0, x, x}, {0, 0, x}}]
;[o]
x x x
0 x x
0 0 x
(* crea matrice trasposta *)
ma1={{a,a,a},{b,b,b}}
MatrixForm[ma1]
trasposta=Transpose[ma1]
MatrixForm[trasposta]
{{a, a, a}, {b, b, b}}
;[o]
{{a, a, a}, {b, b, b}}
MatrixForm[{{a, a, a}, {b, b, b}}]
;[o]
a a a
b b b
{{a, b}, {a, b}, {a, b}}
;[o]
{{a, b}, {a, b}, {a, b}}
MatrixForm[{{a, b}, {a, b}, {a, b}}]
;[o]
a b
a b
a b
(* crea matrice inversa *)
ma2={{a,b},{c,d}}
MatrixForm[ma2]
inversa=Inverse[ma2]
MatrixForm[inversa]
{{a, b}, {c, d}}
;[o]
{{a, b}, {c, d}}
MatrixForm[{{a, b}, {c, d}}]
;[o]
a b
c d
{{d/(-(b*c) + a*d), -(b/(-(b*c) + a*d))},
{-(c/(-(b*c) + a*d)), a/(-(b*c) + a*d)}}
;[o]
d b c a
{{------------, -(------------)}, {-(------------), ------------}}
-(b c) + a d -(b c) + a d -(b c) + a d -(b c) + a d
MatrixForm[{{d/(-(b*c) + a*d), -(b/(-(b*c) + a*d))},
{-(c/(-(b*c) + a*d)), a/(-(b*c) + a*d)}}]
;[o]
d b
------------ -(------------)
-(b c) + a d -(b c) + a d
c a
-(------------) ------------
-(b c) + a d -(b c) + a d
(* crea determinante matrice quadrata *)
MatrixForm[ma2]
determinante=Det[ma2]
MatrixForm[{{a, b}, {c, d}}]
;[o]
a b
c d
-(b*c) + a*d
;[o]
-(b c) + a d