|
|
A068419
|
|
Odd prime values of sigma(k) - phi(k) taking k in increasing order.
|
|
0
|
|
|
5, 11, 7, 23, 11, 47, 79, 73, 67, 23, 191, 283, 383, 739, 47, 1459, 281, 607, 59, 1153, 1069, 3319, 83, 1801, 2671, 3517, 743, 107, 6679, 3529, 6619, 6143, 6271, 4153, 10169, 9817, 167, 6451, 179, 24097, 23539, 10369, 227, 263, 16369, 41203, 20809, 54919
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
sigma(2312) - phi(2312) = 3517 is prime, so is in the sequence.
|
|
PROG
|
(PARI) lista(nn) = {for (k = 1, nn, if (isprime(p = (sigma(k) - eulerphi(k))) && (p % 2), print1(p, ", ")); ); } \\ Michel Marcus, Nov 24 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|