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 A376955 #8 Oct 16 2024 21:37:59
%S A376955 1,3,6,9,12,15,18,21,25,28,31,34,37,41,44,47,50,53,56,60,63,66,69,72,
%T A376955 76,79,82,85,88,92,95,98,101,104,108,111,114,117,120,124,127,130,133,
%U A376955 136,140,143,146,149,152,156,159,162,165,168,172,175,178,181,184
%N A376955 a(n) = least k such that (3n*Pi/4)^(2k)/(2 k)! < 1.
%C A376955 The numbers (3n*Pi/4)^(2k)/(2 k)! are the coefficients in the Maclaurin series for cos x when x = 3n*Pi/4. If m>a(n), then (3m*Pi/4)^(2k)/(2 k)! < 1.
%F A376955 a(n) ~ 3*Pi*exp(1)*n/8 - log(n)/4. - _Vaclav Kotesovec_, Oct 13 2024
%t A376955 a[n_] := Select[Range[200], (3n Pi/4)^(2 #)/(2 #)! < 1 &, 1];
%t A376955 Flatten[Table[a[n], {n, 0, 200}]]
%Y A376955 Cf. A370507, A376952, A376953, A376954, A376956, A376957, A376958, A376959, A376960.
%K A376955 nonn
%O A376955 0,2
%A A376955 _Clark Kimberling_, Oct 12 2024