A068399 - OEIS

A068399

Number of digits in numerator of B(2n) the Bernoulli numbers.

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

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,7

LINKS

Seiichi Manyama, Table of n, a(n) for n = 0..1000

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).