This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A181059 #24 Apr 06 2021 20:15:56 %S A181059 -1,0,1,1,-1,-2,-2,-1,1,1,0,-2,-2,-1,0,1,0,-1,-2,-1,0,1,0,-1,-2,-2,0, %T A181059 1,1,0,-2,-2,-1,1,1,0,-1,-2,-1,0,1,0,-1,-2,-1,0,1,1,-1,-2,-2,-1,1,1,0, %U A181059 -2,-2,-1,0,1,0,-1,-2,-1,0,1,0,-1,-2,-2,0,1,1,0,-2,-2,-1,1,1,0,-1,-2,-1,0 %N A181059 a(n) = floor(sin(n) - cos(n)). %H A181059 G. C. Greubel, <a href="/A181059/b181059.txt">Table of n, a(n) for n = 0..500</a> %F A181059 a(n) = floor( -sqrt(2)*cos(n + Pi/4) ). - _R. J. Mathar_, Oct 03 2010 %p A181059 A181059 := proc(n) -sqrt(2)*cos(n+Pi/4) ; floor(%) ; end proc: seq(A181059(n), n=0..120) ; # _R. J. Mathar_, Oct 03 2010 %t A181059 Table[Floor[Sin[n]-Cos[n]],{n,0,120}] (* _Harvey P. Dale_, Jun 01 2018 *) %o A181059 (Magma) [Floor(Sin(n) - Cos(n)): n in [0..120]]; // _G. C. Greubel_, Apr 05 2021 %o A181059 (Sage) [floor(-sqrt(2)*cos(n+pi/4)) for n in (0..120)] # _G. C. Greubel_, Apr 05 2021 %Y A181059 Cf. A126564 (floor sin(n)*cos(n)). %K A181059 sign,easy %O A181059 0,6 %A A181059 _Jonathan D. B. Hodgson_, Oct 01 2010 %E A181059 More terms from _R. J. Mathar_, Oct 03 2010