A129490 Number of digits in the decimal expansion of the number of partitions of 2^n.
1, 1, 1, 2, 3, 4, 7, 10, 15, 22, 32, 47, 67, 97, 138, 197, 280, 398, 565, 801, 1134, 1607, 2275, 3219, 4555, 6445, 9118, 12898, 18243, 25803, 36494, 51615, 72998, 103238, 146005, 206486, 292020, 412982, 584050, 825975, 1168110, 1651962, 2336232
Offset: 0
Programs
-
Mathematica
f[n_] := Floor[ Log[10, PartitionsP[2^n]] + 1]; Table[ f@n, {n, 0, 42}]
Formula
Extensions
Missing a(0) prepended by Georg Fischer, Nov 06 2023
Comments