OFFSET
0,8
COMMENTS
Conjecture: a(n) > 0 for all n > 51.
LINKS
Ilya Gutkovskiy, Extended graphical example
Eric Weisstein's World of Mathematics, Multiplicative Perfect Number
FORMULA
G.f.: (Sum_{k>=1} x^A007422(k))^2.
EXAMPLE
a(16) = 5 because we have [15, 1], [10, 6], [8, 8], [6, 10] and [1, 15].
MATHEMATICA
nmax = 95; CoefficientList[Series[Sum[Boole[Sqrt[k]^DivisorSigma[0, k]/k == k] x^k, {k, 1, nmax}]^2, {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Feb 18 2017
STATUS
approved