OFFSET
1,1
COMMENTS
A006512 (greater of twin primes) is a subsequence. - Michel Marcus, Feb 27 2019
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 61-1 = 60. So 61 is in the sequence.
MAPLE
A162565 := proc(n) local p, q; p := ithprime(n) ; q := prevprime(p) ; if (p-1) mod (p-q) = 0 then printf("%d, ", p); fi; end: seq(A162565(n), n=2..200) ; # R. J. Mathar, Jul 13 2009
MATHEMATICA
Transpose[Select[Partition[Prime[Range[110]], 2, 1], Divisible[#[[2]]-1, #[[2]] - #[[1]]]&]][[2]] (* Harvey P. Dale, Mar 18 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Jul 06 2009
EXTENSIONS
More primes from R. J. Mathar, Jul 13 2009
STATUS
approved