The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A362286 Record values in A138705. 2
 1, 2, 3, 6, 7, 10, 17, 23, 33, 39, 42, 46, 49, 54, 55, 57, 66, 73, 78, 83, 85, 95, 100, 105, 118, 133, 157, 162, 183, 201, 220, 224, 234, 242, 262, 272, 273, 287, 309, 314, 366 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS The corresponding indices of records are in A362285. LINKS Table of n, a(n) for n=1..41. FORMULA a(n) = A138705(A362285(n)). MATHEMATICA seq[kmax_] := Module[{s = {}, mx = 0, m}, Do[m = Length[ContinuedFraction[ Abs[BernoulliB[2*k]]]]; If[m > mx, mx = m; AppendTo[s, m]], {k, 0, kmax}]; s]; seq[1000] PROG (PARI) lista(kmax) = {my(mx = 0, m); for(k = 0, kmax, m = #contfrac(abs(bernfrac(2*k))); if(m > mx, mx = m; print1(m, ", "))); } CROSSREFS Cf. A000367, A002445, A027641, A027642, A100195, A138705, A362284, A362285. Sequence in context: A058632 A086583 A107852 * A050031 A003421 A375738 Adjacent sequences: A362283 A362284 A362285 * A362287 A362288 A362289 KEYWORD nonn,more AUTHOR Amiram Eldar, Apr 14 2023 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 18 14:24 EDT 2024. Contains 376000 sequences. (Running on oeis4.)