OFFSET
1,1
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..1000
EXAMPLE
For n=3: a(3) = 29 = p(10) because 29 - p(7) = 29 - 17 = 12 is divisible by 3.
For n=25: a(25) = 103 = p(27) because 103 - p(27-25) = 103 - 3 = 100 is divisible by 25.
MATHEMATICA
Table[s = n + 1; While[! Divisible[Set[p, Prime@ s] - Prime[s - n], n], s++]; p, {n, 57}] (* Michael De Vlieger, Jul 30 2017 *)
PROG
(PARI) a(n) = {s = n+1; while ((prime(s) - prime(s-n)) % n, s++); prime(s); } \\ Michel Marcus, Dec 26 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jul 16 2002
STATUS
approved