OFFSET
1,2
COMMENTS
If n = Product p(i)^r(i), d = Product p(i)^s(i) and s(i) = 0 or s(i) divides r(i), then d is a (1+e)-divisor of n.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..100
MATHEMATICA
f[p_, e_] := (DivisorSigma[0, e] + 1)/(p^e + DivisorSum[e, p^(e - #) &]); h[n_] := n*Times @@ (f @@@ FactorInteger[n]); Select[h /@ Range[10^5], IntegerQ] (* Amiram Eldar, Sep 07 2019*)
CROSSREFS
KEYWORD
nonn
AUTHOR
Naohiro Nomoto, Apr 14 2001
EXTENSIONS
More terms from Amiram Eldar, Sep 07 2019
STATUS
approved