Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #7 Oct 10 2024 15:21:41
%S 1,4,8,12,16,20,25,29,33,37,42,46,50,54,59,63,67,71,76,80,84,88,93,97,
%T 101,105,110,114,118,122,127,131,135,140,144,148,152,157,161,165,169,
%U 174,178,182,186,191,195,199,203,208,212,216,221,225,229,233,238
%N a(n) = least k such that (n*pi)^(2k)/(2 k)! < 1.
%C The numbers (n*Pi)^(2k)/(2 k)! are the coefficients in the Maclaurin series for cos x when x = n*Pi.
%C (n*pi)^k/(2 k)! < 1 for every k >= a(n).
%t a[n_] := Select[Range[300], (n Pi)^(2 #)/(2 #)! < 1 &, 1]
%t Flatten[Table[a[n], {n, 0, 300}]]
%Y Cf. A374987, A376456, A376457, A375053, A375054.
%K nonn
%O 0,2
%A _Clark Kimberling_, Oct 01 2024
%E Edited by _Clark Kimberling_, Oct 10 2024