|
|
A061437
|
|
Numbers n such that n+1 divides prime(n)+1.
|
|
1
|
|
|
5, 6, 13, 15, 31, 32, 34, 75, 77, 445, 2701, 15929, 40079, 40156, 251720, 251766, 251769, 251787, 10553437, 10553577, 10553645, 10553815, 179992919, 179993161, 179993169, 3140421756, 3140421774, 3140421782, 55762149085, 55762149089, 55762149101
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
5+1 divides Prime(5)+1 = 11+1, so 5 is a term of the sequence.
|
|
MATHEMATICA
|
Select[Range[10^6], Mod[Prime[ # ] + 1, # + 1] == 0 &]
|
|
PROG
|
(PARI) isok(n) = (prime(n)+1) % (n+1) == 0; \\ Michel Marcus, Apr 15 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Corrected and extended by Don Reble, Nov 20 2006
|
|
STATUS
|
approved
|
|
|
|