OFFSET
1,4
COMMENTS
a(n) is the number of ways to choose a strict integer partition of a divisor of A052409(n).
LINKS
FORMULA
From Antti Karttunen, Jul 31 2018: (Start)
EXAMPLE
The a(16) = 4 twice-factorizations: (2)*(2*2*2), (2*2*2*2), (4*4), (16).
MATHEMATICA
Table[DivisorSum[GCD@@FactorInteger[n][[All, 2]], PartitionsQ], {n, 100}]
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Dec 05 2017
EXTENSIONS
More terms from Antti Karttunen, Jul 29 2018
STATUS
approved