%I #9 Mar 31 2012 10:26:26

%S 0,0,0,0,-1,-2,-3,-3,-3,-3,-4,-5,-6,-6,-6,-6,-7,-8,-9,-9,-9,-9,-10,

%T -11,-12,-12,-12,-12,-12,-12,-12,-12,-12,-12,-12,-12,-12,-12,-12,-12,

%U -12,-12,-12,-12,-12,-12,-12,-13,-14,-15,-16,-17,-18,-19,-20,-21,-22,-23

%N Det(M) where M is an n X n matrix with M(i,j) = floor(sin(i-j)).

%t M[n_] := Table[Floor[Sin[i - j]], {i, n}, {j, n}];aux=Table[Det[M[n]], {n, 150}]; ListPlot[aux]

%K sign

%O 1,6

%A _José María Grau Ribas_, Apr 05 2010