|
|
A114467
|
|
Number of decimal digits in the numerator of the 10^n-th harmonic number.
|
|
2
|
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[IntegerLength[Numerator[HarmonicNumber[10^n]]], {n, 0, 8}](* Harvey P. Dale, May 24 2019 *)
|
|
PROG
|
(Python)
from gmpy2 import digits, mpq
def a(n): return len(digits(sum(mpq(1, n) for n in range(1, 10**n+1)).numerator))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|