A154412 Primes of the form 10n^2+14n+5, n >= 0.
5, 29, 73, 137, 449, 593, 757, 941, 1613, 1877, 2161, 2789, 3881, 5153, 6101, 7129, 7673, 8237, 8821, 12041, 13469, 15761, 17389, 18233, 26729, 27773, 28837, 29921, 34457, 38069, 39313, 40577, 45833, 60373, 63521, 66749, 71741, 75169, 76913
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[a: n in [0..100] | IsPrime(a) where a is 10*n^2+14*n+5]; // Vincenzo Librandi, Jul 23 2012
-
Mathematica
Select[Table[10n^2+14n+5,{n,0,200}],PrimeQ] (* Vincenzo Librandi, Jul 23 2012 *)
-
PARI
{for(n=0, 100, if(isprime(k=10*n^2+14*n+5), print1(k, ", ")))}; \\ Vincenzo Librandi, Jul 23 2012
Extensions
Corrected by Don Reble, Jun 16 2010