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 A004082 #46 Mar 21 2025 09:39:18
%S A004082 1,7,13,19,26,32,38,44,51,57,63,70,76,82,88,95,101,107,114,120,126,
%T A004082 132,139,145,151,158,164,170,176,183,189,195,202,208,214,220,227,233,
%U A004082 239,246,252,258,264,271,277,283,290,296
%N A004082 Numbers k such that sin(k-1) <= 0 and sin(k) > 0.
%C A004082 Apart from the first term this is also the sequence ceiling(circumference of a circle of radius n) = ceiling(2*Pi*n), n >= 1. - _Mohammad K. Azarian_, Feb 29 2008, Aug 01 2009
%C A004082 Bisection of A004084. - _Michel Marcus_, Mar 21 2013
%H A004082 Harvey P. Dale, <a href="/A004082/b004082.txt">Table of n, a(n) for n = 1..1000</a>
%F A004082 a(n) = A038130(n-1) + 1.
%t A004082 Join[{1},Transpose[SequencePosition[Table[If[Sin[n]<=0,1,0],{n,300}],{1,0}]][[2]]] (* The program uses the SequencePosition function from Mathematica version 10 *) (* _Harvey P. Dale_, Apr 12 2016 *)
%o A004082 (PARI) lista(m) = {for (i=1, m, if ((sin(i-1)<=0) && (sin(i) > 0), print1(i, ", ")););} \\ _Michel Marcus_, Mar 21 2013
%Y A004082 Cf. A004084, A066643.
%Y A004082 For floor(2*Pi*n) see A038130.
%Y A004082 See A277690 for another version.
%K A004082 nonn
%O A004082 1,2
%A A004082 _Clark Kimberling_