OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Table[10n^2+14n+5, {n, 0, 200}], PrimeQ] (* Vincenzo Librandi, Jul 23 2012 *)
PROG
(Magma) [a: n in [0..100] | IsPrime(a) where a is 10*n^2+14*n+5]; // 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
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jan 09 2009
EXTENSIONS
Corrected by Don Reble, Jun 16 2010
STATUS
approved