cp's OEIS Frontend

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.

A375053 a(n) = least k such that (n Pi)^(2 k + 1)/(2 k + 1)! < 1.

This page as a plain text file.
%I A375053 #4 Oct 02 2024 14:28:48
%S A375053 1,3,7,11,16,20,24,28,33,37,41,45,50,54,58,62,67,71,75,79,84,88,92,96,
%T A375053 101,105,109,113,118,122,126,131,135,139,143,148,152,156,160,165,169,
%U A375053 173,177,182,186,190,194,199,203,207,212,216,220,224,229,233,237
%N A375053 a(n) = least k such that (n Pi)^(2 k + 1)/(2 k + 1)! < 1.
%C A375053 The numbers (n Pi)^(2 k + 1)/(2 k + 1)! are the coefficients in the Maclaurin series for sin x when x = n*Pi.
%C A375053 (n Pi)^(2 k + 1)/(2 k + 1)! < 1 for every k >= a(n).
%t A375053 z = 300; r = Pi;
%t A375053 a[n_] := Select[Range[z], (n  r)^(2 # + 1)/(2 # + 1)! < 1 &, 1]
%t A375053 Flatten[Table[a[n], {n, 0, 100}]]
%Y A375053 Cf. A374987, A376456, A376457, A375054, A375057.
%K A375053 nonn
%O A375053 0,2
%A A375053 _Clark Kimberling_, Oct 01 2024