|
| |
|
|
A060661
|
|
Sigma(x) = n has exactly five solutions.
|
|
0
| |
|
|
72, 144, 192, 216, 588, 600, 648, 792, 936, 992, 1056, 1224, 1302, 1320, 1560, 1736, 1980, 2040, 2088, 2112, 2268, 2448, 2730, 2790, 2912, 3038, 3136, 3312, 3472, 3520, 3534, 3552, 3672, 3792, 3816, 3936, 4056, 4092, 4340, 4440, 4864, 4872, 4920, 4960
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 72 = sigma(30) = sigma(46) = sigma(51) = sigma(55) = sigma(71).
|
|
|
MATHEMATICA
| a = Table[ 0, {5000} ]; Do[ s = DivisorSigma[ 1, n ]; If[ s < 5001, a[ [ s ] ]++ ], {n, 1, 5000} ]; Select[ Range[ 5000 ], a[ [ # ] ] == 5 & ]
|
|
|
CROSSREFS
| Cf. A007370, A007371, A007372.
Sequence in context: A090784 A143741 A157336 * A050495 A137883 A173728
Adjacent sequences: A060658 A060659 A060660 * A060662 A060663 A060664
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 18 2001
|
| |
|
|
