login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A068399
Number of digits in numerator of B(2n) the Bernoulli numbers.
3
1, 1, 1, 1, 1, 1, 3, 1, 4, 5, 6, 6, 9, 7, 11, 13, 13, 13, 20, 16, 21, 22, 23, 24, 28, 27, 30, 32, 34, 35, 43, 38, 42, 46, 44, 49, 55, 50, 53, 57, 61, 61, 67, 63, 70, 73, 73, 73, 81, 77, 83, 85, 87, 89, 97, 94, 100, 98, 102, 102, 113, 107, 110, 118, 117, 121, 126, 123, 128, 133
OFFSET
0,7
LINKS
Eric Weisstein's World of Mathematics, Bernoulli Number
MATHEMATICA
IntegerLength/@Numerator[BernoulliB[2Range[70]]] (* Harvey P. Dale, Jun 21 2013 *)
PROG
(PARI) a(n)=logint(abs(numerator(bernfrac(2*n))), 10)+1 \\ Charles R Greathouse IV, Jan 20 2017
CROSSREFS
Cf. A092904 (denominator).
Sequence in context: A302917 A069203 A046070 * A225407 A353292 A183904
KEYWORD
nonn,base
AUTHOR
Benoit Cloitre, Mar 01 2002
EXTENSIONS
a(0) from Seiichi Manyama, Jan 20 2017
STATUS
approved