aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Just another update

Browse source
This commit is contained in:
Ingy döt Net 2015-02-20 00:35:01 -05:00
parent a25938f123
commit 00a190b0a6
6591 changed files with 94363 additions and 23227 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Task/Matrix-multiplication/Mathematica/matrix-multiplication-1.math
View file

@ -1,7 +1 @@
M1 = {{1, 2},
{3, 4},
{5, 6},
{7, 8}}
M2 = {{1, 2, 3},
{4, 5, 6}}
M = M1.M2
Dot[{{a, b}, {c, d}}, {{w, x}, {y, z}}]

2
Task/Matrix-multiplication/Mathematica/matrix-multiplication-2.math
View file

@ -1 +1 @@
{{1, 2}, {3, 4}, {5, 6}, {7, 8}}.{{1, 2, 3}, {4, 5, 6}}
{{a w + b y, a x + b z}, {c w + d y, c x + d z}}

2
Task/Matrix-multiplication/Mathematica/matrix-multiplication-3.math
View file

@ -1 +1 @@
{{9, 12, 15}, {19, 26, 33}, {29, 40, 51}, {39, 54, 69}}
{{a, b}, {c, d}} . {{w, x}, {y, z}}

8
Task/Matrix-multiplication/Mathematica/matrix-multiplication-4.math
View file

@ -1,7 +1 @@
matrixMul[m1_, m2_] := Table[Times @@ {a, b} // Tr, {a, m1}, {b, Transpose@m2}]
matrixMul2[m1_, m2_] :=Table[Sum[Times @@ i, {i, Transpose@{a, b}}], {a, m1}, {b, Transpose@m2}]
a = {{1, 2}, {3, 4}, {5, 6}, {7, 8}};
b = {{1, 2, 3}, {4, 5, 6}};
matrixMul[a, b]
matrixMul2[a, b]
Times[{{a, b}, {c, d}}, {{w, x}, {y, z}}]

1
Task/Matrix-multiplication/Mathematica/matrix-multiplication-5.math Normal file
View file

@ -0,0 +1 @@
{{a w, b x}, {c y, d z}}

1
Task/Matrix-multiplication/Mathematica/matrix-multiplication-6.math Normal file
View file

@ -0,0 +1 @@
{{a, b}, {c, d}}*{{w, x}, {y, z}}

1
Task/Matrix-multiplication/Mathematica/matrix-multiplication-7.math Normal file
View file

@ -0,0 +1 @@
{{a, b}, {c, d}} {{w, x}, {y, z}}

1
Task/Matrix-multiplication/Mathematica/matrix-multiplication-8.math Normal file
View file

@ -0,0 +1 @@
Dot[{{85, 60, 65}, {54, 99, 33}, {46, 52, 87}}, {{89, 77, 98}, {55, 27, 25}, {80, 68, 85}}]

1
Task/Matrix-multiplication/Mathematica/matrix-multiplication-9.math Normal file
View file

@ -0,0 +1 @@
{{16065, 12585, 15355}, {12891, 9075, 10572}, {13914, 10862, 13203}}