3 lines
153 B
Text
3 lines
153 B
Text
n=7;
|
|
Column[StringReplace[ToString /@ Replace[MatrixExp[SparseArray[
|
|
{Band[{2,1}] -> Range[n-1]},{n,n}]],{x__,0..}->{x},2] ,{"{"|"}"|","->" "}], Center]
|