A300658 Numbers m that divide sigma(sigma(m) - m) where sigma is the sum of divisors function (A000203).
4, 6, 8, 28, 32, 36, 78, 84, 128, 168, 252, 496, 504, 532, 756, 1488, 2808, 3720, 4464, 5928, 8128, 8192, 13392, 24384, 61236, 73152, 78120, 131072, 183708, 217728, 219456, 425880, 458640, 524288, 1084752, 1834560, 2204280, 3254256, 6120432, 6386688, 11007360
Offset: 1
Keywords
Examples
6 is a term because sigma(sigma(6) - 6) / 6 = 12 / 6 = 2 (integer).
Programs
-
Magma
[n: n in[2..1000000] | SumOfDivisors(SumOfDivisors(n)- n) mod n eq 0];
-
PARI
isok(n) = (n!=1) && !(sigma(sigma(n)-n) % n); \\ Michel Marcus, Mar 25 2018
Comments