Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A090186
a(n) is the least prime of the form prime(n)# * k + prime(n+1).
1
5, 11, 37, 431, 13873, 30047, 510529, 9699713, 446185769, 51757545871, 601681470427, 22262214404471, 2434002108217723, 13082761331670077, 1229779565176982873, 32589158477190044789, 1922760350154212639131
OFFSET
1,1
COMMENTS
# denotes primorial; k >= 1.
LINKS
EXAMPLE
a(4)=431 because prime(4)#*2+prime(5) = 431 is prime.
MATHEMATICA
lp[{a_, b_}]:=Module[{k=1}, While[!PrimeQ[k*a+b], k++]; k*a+b]; With[{nn=20}, lp/@Thread[ {FoldList[Times, Prime[Range[nn]]], Prime[Range[2, nn+1]]}]] (* Harvey P. Dale, Dec 25 2018 *)
CROSSREFS
Sequence in context: A152563 A077466 A074626 * A205719 A332475 A139515
KEYWORD
nonn
AUTHOR
Pierre CAMI, Jan 21 2004
EXTENSIONS
Edited by Don Reble, May 07 2006
STATUS
approved