Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- baseMX = Hold[
- a*MatrixPower[X, 2] [Minus] b*X [Minus] c*IdentityMatrix[5]];
- subbedMX =
- baseMX /. {X ->
- Array[Symbol["x" <> Map[ToString, {##}]] &, {5, 5}], a -> 1,
- b -> 2, c -> 3} // ReleaseHold;
- baseEq = subbedMX == Array[0 &, {5, 5}];
- subbedMX // TeXForm
Add Comment
Please, Sign In to add comment