|
| |
|
|
A056075
|
|
Numbers n such that n | Sigma(n) - d(n).
|
|
2
| |
|
|
1, 4, 56, 7192, 7232, 7912, 10792, 17272, 30592, 114256, 2154584, 3428368, 44375136, 89245784
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Or, numbers n such that signa[n]=k.n+d[n] for some k.
For most terms>4, sigma[n]=2n+d[n], i.e. k=2. However, for the 12th term, k=3.
|
|
|
FORMULA
| Numbers n such that Mod[A000203(n), n]=A000005(n) or A054024(n)=A000005(n). - Labos E. (labos(AT)ana.sote.hu), Apr 12 2002
|
|
|
MATHEMATICA
| Do[If[Mod[DivisorSigma[1, n]-DivisorSigma[0, n], n]==0, Print[n]], {n, 1, 10^8}]
|
|
|
CROSSREFS
| Cf. A000203, A000005, A054024.
Sequence in context: A089516 A000573 A070019 * A000315 A080984 A071579
Adjacent sequences: A056072 A056073 A056074 * A056076 A056077 A056078
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 26 2000
|
| |
|
|
