A248731 Number of digits in the decimal expansion of the number of partitions of 5^n.

1, 1, 4, 10, 25, 58, 135, 306, 690, 1550, 3474, 7776, 17398, 38912, 87022, 194598, 435148, 973034, 2175785

Offset: 0

Author

Robert G. Wilson v, Oct 12 2014

Keywords

• nonn
• base
• more

Crossrefs

Cf. A129490, A248729, A248733, A248735, A077644, A248736, A248730.

Programs

Magma

[Floor(Log(10,(NumberOfPartitions(5^n))))+1: n in [0..8]]; // Vincenzo Librandi, Oct 13 2014

Mathematica

f[n_] := Floor[ Log[10, PartitionsP[ 5^n]] + 1]; Table[ f@n, {n, 0, 30}]
IntegerLength[PartitionsP[5^Range[0,18]]] (* Harvey P. Dale, Sep 10 2021 *)

PARI

a(n) = #Str(numbpart(5^n)); \\ Michel Marcus, Oct 16 2014