A102130 Primes of the form 8*n^2 + 4*n + 1.
13, 41, 313, 421, 1013, 1201, 1861, 2113, 2381, 3613, 5101, 7321, 9941, 10513, 13613, 14281, 16381, 20201, 21013, 21841, 24421, 30013, 34061, 41761, 47741, 51521, 52813, 54121, 59513, 60901, 82013, 83641, 90313, 97241, 99013, 100801, 106261
Offset: 1
Crossrefs
Primes in A102083.
Programs
-
Magma
[ a: n in [0..400] | IsPrime(a) where a is 8*n^2 +4*n + 1]; // Vincenzo Librandi, Nov 17 2010
-
Mathematica
Select[Table[8n^2+4n+1,{n,0,200}],PrimeQ] (* Harvey P. Dale, Jul 24 2012 *)