|
| |
|
|
A048884
|
|
Numbers n such that sigma(n) - n = n - pi(n) - 1 where pi(n) is A000720.
|
|
0
| |
|
|
1, 5, 9, 26, 236, 244, 4862, 5396, 6868, 9608, 9704, 23764, 82665, 733064, 25881904, 25886864, 33299110, 261851668
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
MATHEMATICA
| For[i = 1, i < 1000000000000, i++, If[DivisorSigma[1, i] - i == i - PrimePi[i] - 1, Print[i]]; ]; - Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 29 2006
|
|
|
CROSSREFS
| Cf. A037172.
Sequence in context: A112084 A038251 A034498 * A077915 A193316 A026587
Adjacent sequences: A048881 A048882 A048883 * A048885 A048886 A048887
|
|
|
KEYWORD
| more,nonn
|
|
|
AUTHOR
| Naohiro Nomoto (6284968128(AT)geocities.co.jp)
|
|
|
EXTENSIONS
| More terms from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 29 2006
|
| |
|
|
