Timeline for Set default product
Current License: CC BY-SA 4.0
13 events
when toggle format | what | by | license | comment | |
---|---|---|---|---|---|
Mar 3, 2020 at 9:38 | comment | added | chris | could you please make your answer more explicit please. Presently its not exactly clear what the question/ the answer is. | |
Jun 7, 2019 at 9:16 | comment | added | Alonso Perez-Lona |
@ΑλέξανδροςΖεγγ, I solved it implementing a While . Thank you very much!
|
|
Jun 7, 2019 at 8:57 | comment | added | Alonso Perez-Lona |
Those two last comments are the desired outputs. The one you sent me does not quite preserve the size of the matrix. This is because you are applying CenterDot to the matrices. What I want is to apply Inner to the matrices using CenterDot as the product operation instead of Times as Dot uses.
|
|
Jun 7, 2019 at 8:56 | comment | added | Alonso Perez-Lona |
Subscript[o, 1, 2] \[CenterDot] Subscript[o, 1, 3], -(Subscript[o, 1, 3] \[CenterDot] Subscript[o, 1, 3]) - Subscript[o, 2, 3] \[CenterDot] Subscript[o, 2, 3]}}]
|
|
Jun 7, 2019 at 8:56 | comment | added | Alonso Perez-Lona | `MatrixForm[{{-(Subscript[o, 1, 2] [CenterDot] Subscript[o, 1, 2]) - Subscript[o, 1, 3] [CenterDot] Subscript[o, 1, 3], -(Subscript[o, 1, 3] [CenterDot] Subscript[o, 2, 3]), Subscript[o, 1, 2] [CenterDot] Subscript[o, 2, 3]}, {Subscript[o, 1, 3] [CenterDot] Subscript[o, 2, 3], -(Subscript[o, 1, 2] [CenterDot] Subscript[o, 1, 2]) - Subscript[o, 2, 3] [CenterDot] Subscript[o, 2, 3], -(Subscript[o, 1, 2] [CenterDot] Subscript[o, 1, 3])}, {-(Subscript[o, 1, 2] [CenterDot] Subscript[o, 2, 3])' | |
Jun 7, 2019 at 8:54 | comment | added | Alonso Perez-Lona |
It does not quite work, the output of that is MatrixForm[{{0, Subscript[o, 1, 2], Subscript[o, 1, 3]}, {-Subscript[o, 1, 2], 0, Subscript[o, 2, 3]}, {-Subscript[o, 1, 3], -Subscript[o, 2, 3], 0}} \[CenterDot] {{0, Subscript[o, 1, 2], Subscript[o, 1, 3]}, {-Subscript[o, 1, 2], 0, Subscript[o, 2, 3]}, {-Subscript[o, 1, 3], -Subscript[o, 2, 3], 0}}]
|
|
Jun 7, 2019 at 8:36 | comment | added | Αλέξανδρος Ζεγγ |
Try this: Clear[mymatrixpower]; mymatrixpower[A_, 0] := 1; mymatrixpower[A_, i_] := CenterDot @@ Table[A, i];
|
|
Jun 7, 2019 at 8:30 | comment | added | Alonso Perez-Lona |
Kind of like this answer: matrixlist=Table[M[j],{j,1,n}] Apply[Dot,matrixlist] but instead of Dot , Inner . I cannot just apply it like that because Inner expects me to tell it the operations I want to use.
|
|
Jun 7, 2019 at 8:21 | comment | added | Alonso Perez-Lona | @ΑλέξανδροςΖεγγ I edited my question in the comment above | |
Jun 7, 2019 at 8:07 | comment | added | Αλέξανδρος Ζεγγ | So, what is it? | |
Jun 7, 2019 at 8:06 | comment | added | Alonso Perez-Lona |
@ΑλέξανδροςΖεγγ However, I have a question, hope you can help me. I am trying to implement this in something that looks like Sum[A^i, {i, 0, l}] . Where A is a matrix. However, I want that "power" to be the A.A.A....A i times, using CenterDot to multiply the terms.
|
|
Jun 7, 2019 at 8:00 | comment | added | Αλέξανδρος Ζεγγ | Yes, that is it. | |
Jun 7, 2019 at 7:59 | history | answered | Alonso Perez-Lona | CC BY-SA 4.0 |