OFFSET
0,2
FORMULA
MATHEMATICA
f[n_] := Floor[ Log[10, PartitionsP[ 6^n]] + 1]; Table[ f@n, {n, 0, 17}]
PROG
(Magma) [Floor(Log(10, (NumberOfPartitions(6^n))))+1: n in [0..7]]; // Vincenzo Librandi, Oct 13 2014
(PARI) a(n) = #Str(numbpart(6^n)); \\ Michel Marcus, Oct 16 2014
(Python)
from sympy import npartitions
from gmpy2 import digits
def A248733(n): return len(digits(npartitions(6**n))) # Chai Wah Wu, Jul 15 2024
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Robert G. Wilson v, Oct 12 2014
STATUS
approved