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 A046964 #27 Feb 29 2020 13:41:10
%S A046964 1,3,4,5,11,344,1054,1764,2474,3184,3894,4604,5314,6024,6734,7444,
%T A046964 8154,8864,9574,10284,10994,11704,12414,13124,13834,14544,15254,15964,
%U A046964 16674,17384,18094,18804,19514,20224,20934,21644,22354,23064,23774,24484,25194,25904
%N A046964 Sin(n) decreases monotonically to -1.
%C A046964 Sin(10265498) =-0.9999999999999999313932793053103935998520142594607...
%H A046964 Hugo Pfoertner, <a href="/A046964/b046964.txt">Table of n, a(n) for n = 1..93</a>, terms a(1)..a(88) from Robert G. Wilson v
%t A046964 z={}; current=1; Timing[ Do[ If[ Sin[ n ]<current, AppendTo[ z, current=Sin[ n ] ] ], {n, 30000} ] ]; z
%t A046964 d = 1; lst = {}; Do[a = Sin@n; If[a > d, d = a; Print@n; AppendTo[lst, n]], {n, 111111111}]; lst (* _Robert G. Wilson v_, Aug 24 2007 *)
%o A046964 (PARI) d=oo; print1("1, 3, "); for(k=1,10^8, my(di=2*k/Pi,dir=round(di),dd);if(dir%4==3,dd=abs(di-dir); if(dd<d, print1(k,", "); d=dd))) \\ _Hugo Pfoertner_, Feb 29 2020
%Y A046964 Cf. A046959, A046965.
%K A046964 nonn
%O A046964 1,2
%A A046964 _Wouter Meeussen_