The inverse of almost periodic matrices
|
Animate[MatrixPlot[
Inverse[Table[N[Cos[1.0 n*m+x]],{n,200},{m,200}]],
Frame -> False, Axes -> False,ColorFunction -> Hue],
{x,0,2 Pi}]
|
| M | A | T | H |
| 2 | 1 | B |
|
|
Animate[MatrixPlot[
Inverse[Table[N[Cos[1.0 n*m+x]],{n,200},{m,200}]],
Frame -> False, Axes -> False,ColorFunction -> Hue],
{x,0,2 Pi}]
|