A061437 - OEIS

%I #11 Oct 19 2017 03:13:54

%S 5,6,13,15,31,32,34,75,77,445,2701,15929,40079,40156,251720,251766,

%T 251769,251787,10553437,10553577,10553645,10553815,179992919,

%U 179993161,179993169,3140421756,3140421774,3140421782,55762149085,55762149089,55762149101

%N Numbers n such that n+1 divides prime(n)+1.

%e 5+1 divides Prime(5)+1 = 11+1, so 5 is a term of the sequence.

%t Select[Range[10^6], Mod[Prime[ # ] + 1, # + 1] == 0 &]

%o (PARI) isok(n) = (prime(n)+1) % (n+1) == 0; \\ _Michel Marcus_, Apr 15 2017

%Y Cf. A045924, A062061.

%K nonn

%O 1,1

%A _Joseph L. Pe_, Feb 13 2002

%E Corrected and extended by _Don Reble_, Nov 20 2006

%E a(26)-a(31) from _Giovanni Resta_, Apr 15 2017