A336901 Number of digits in the base 10 representation of floor(Bernoulli(2^n)).

1, 0, 1, 1, 1, 11, 39, 114, 303, 759, 1823, 4260, 9751, 21965, 48860, 107580, 234885, 509223, 1097356, 2352534, 5020718, 10672737, 22608081, 47741381, 100533203, 211167291, 442536359, 925476274, 1931759668, 4025133578, 8373495648, 17393448283, 36079810546

Offset

0,6

Links

Table of n, a(n) for n=0..32.

Mathematica

BernDigits[n_] := IntegerLength[Floor[BernoulliB[n]]];
Table[BernDigits[2^n], {n, 0, 14}]

Crossrefs

Sequence in context: A347477 A163634 A343124 * A173373 A127867 A138050

Adjacent sequences: A336898 A336899 A336900 * A336902 A336903 A336904

Keyword

nonn,base

Author

Peter Luschny, Sep 03 2020

Status

approved