A202106 - OEIS

%I #6 Oct 30 2018 10:31:02

%S 3,3,5,3,3,5,3,7,7,19,3,11,7,3,7,7,7,5,3,7,13,13,13,5,3,3,11,31,7,7,3,

%T 3,7,13,3,5,3,3,5,73,13,13,37,13,11,3,3,5,19,7,23,31,3,13,7,3,5,7,7,7,

%U 3,7,5,37,3,7,3,7,7,3,13,7,3,7,11,13,3,23,3

%N Smallest prime p such that 4n^2+p is prime.

%e n=1: 4+3=7 prime, n=2: 16+3=19 prime,

%e n=3: 36+5=41 prime, n=10: 400+19=419 prime.

%t Table[p=3;While[!PrimeQ[4n^2+p],p=NextPrime[p]];p,{n,100}]

%K nonn

%O 1,1

%A _Zak Seidov_, Dec 11 2011