[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A348601
Nonexponential multiply-perfect numbers: numbers k such that k | A160135(k).
4
1, 6, 40, 234, 588, 89376, 10805558400
OFFSET
1,2
COMMENTS
The corresponding quotients A160135(k)/k are 1, 1, 1, 1, 1, 2, 3, ...
a(8) > 1.5*10^10, if it exists.
EXAMPLE
6 is a term since its nonexponential divisors are 1, 2 and 3, so A160135(6) = 1 + 2 + 3 = 6 which is divisible by 6.
40 is a term since its nonexponential divisors are 1, 2, 4, 5, 8 and 20, so A160135(40) = 1 + 2 + 4 + 5 + 8 + 20 = 40 which is divisible by 40.
MATHEMATICA
esigma[n_] := Times @@ (Sum[First[#]^d, {d, Divisors[Last[#]]}] &) /@ FactorInteger[n]; Select[Range[1000], Divisible[DivisorSigma[1, #] - esigma[#], #] &]
CROSSREFS
Cf. A160135.
Similar sequences: A007691, A064594, A064595, A189000, A327158.
Sequence in context: A229580 A254945 A026077 * A065113 A052518 A135032
KEYWORD
nonn,more
AUTHOR
Amiram Eldar, Oct 25 2021
STATUS
approved