OFFSET
1,1
COMMENTS
This is a special case of prime chains generated by f(x) = cx + d.
a(11) > 10175130529. [Donovan Johnson, Sep 27 2008]
LINKS
D. H. Lehmer, On certain chains of primes, Proc. London Math. Soc. (3) 14a 1965 183-186.
EXAMPLE
a(3) = 2 since 2, f(2) = 17, and f(17) = 107 are primes when f(x) = 6*x + 5.
MATHEMATICA
c[p_] := Block[{k=1, q=6*p+5}, While[ PrimeQ[q], q = 6*q+5; k++]; k]; a[n_] := Block[ {p=2}, While[c[p] < n, p = NextPrime[p]]; p]; Array[a, 7] (* Giovanni Resta, Mar 22 2017 *)
CROSSREFS
KEYWORD
more,nonn
AUTHOR
W. Edwin Clark, Jun 14 2003
EXTENSIONS
a(8)-a(10) from Donovan Johnson, Sep 27 2008
a(11)-a(12) from John Cerkan, Jan 11 2017
a(13) from Giovanni Resta, Mar 22 2017
STATUS
approved