OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
The 17th prime is 59 and the 18th prime is 61. (61-59) = 2, and 2 divides 59+1 = 60. So 59 is in the sequence.
MATHEMATICA
For[n = 1, n <= 1000, n++, If[Mod[Prime[n] + 1, Prime[n + 1] - Prime[n]] == 0, Print[Prime[n]]]] (* Jasper Mulder (jasper.mulder(AT)planet.nl), Jul 15 2009 *)
Select[Partition[Prime[Range[100]], 2, 1], Divisible[#[[1]]+1, #[[2]]-#[[1]]]&][[;; , 1]] (* Harvey P. Dale, Aug 06 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Jul 06 2009
EXTENSIONS
More terms from Jasper Mulder (jasper.mulder(AT)planet.nl), Jul 15 2009
STATUS
approved