OFFSET
1,6
MATHEMATICA
M[n_] := Table[Floor[Sin[i - j]], {i, n}, {j, n}]; aux=Table[Det[M[n]], {n, 150}]; ListPlot[aux]
CROSSREFS
KEYWORD
sign
AUTHOR
José María Grau Ribas, Apr 05 2010
STATUS
approved