OFFSET
1,2
EXAMPLE
a(6) = 10 as 10 is the least number that gives 6 primes of the form 10k +1, k<=10. (11,31,41,61,71,101).
MATHEMATICA
t=Table[Length[Select[Range[n], PrimeQ[n#+1]&]], {n, 1000}]; Table[First[Flatten[Position[t, n]]], {n, 100}] (Noe)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Jul 17 2005
EXTENSIONS
More terms from T. D. Noe, Jul 17 2005
STATUS
approved