|
| |
|
|
A068366
|
|
Numbers n such that phi(sigma(n)+n)=sigma(n).
|
|
0
| |
|
|
1, 7, 15, 127, 267, 315, 495, 621, 969, 1155, 1917, 5649, 7515, 12267, 14911, 17271, 22347, 26265, 28671, 30549, 31641, 32895, 45195, 48093, 56697, 60801, 64923, 77409, 79827, 82731, 83559, 116745, 123387, 172653, 173901, 179223, 184869
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Are there any even values in the sequence?
|
|
|
PROG
| (PARI) for(n=1, 300000, if(eulerphi(sigma(n)+n)==sigma(n), print1(n, ", ")))
|
|
|
CROSSREFS
| Sequence in context: A144536 A032004 A032018 * A156499 A137881 A042725
Adjacent sequences: A068363 A068364 A068365 * A068367 A068368 A068369
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Feb 28 2002
|
|
|
EXTENSIONS
| More terms from Rick L. Shepherd (rshepherd2(AT)hotmail.com), Apr 22 2002
|
| |
|
|