A087861 Primes of the form 16*m^2 + 81, m=1,2,3,...

97, 337, 2017, 3217, 4177, 5857, 6481, 13537, 19681, 33937, 48481, 59617, 65617, 80737, 87697, 102481, 144481, 160081, 173137, 211681, 226657, 246097, 296017, 355297, 384481, 457057, 462481, 524257, 541777, 547681, 583777, 602257, 698977

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..5000

Mathematica

Select[Table[16n^2+81, {n, 0, 120000}], PrimeQ] (* Vincenzo Librandi, Dec 11 2011 *)

Prog

(PARI) fourmp1(m, n) = { forstep(x=1, m, 1, y=16*(x^2+n^2)+8*n+1; if(isprime(y), print1(y", ")) ) }
(Magma) [a: n in [0..300] | IsPrime(a) where a is 16*n^2+81]; // Vincenzo Librandi, Dec 11 2011

Crossrefs

Sequence in context: A141899 A140627 A142631 * A269786 A366352 A105128

Adjacent sequences: A087858 A087859 A087860 * A087862 A087863 A087864

Keyword

nonn,easy

Author

Cino Hilliard, Oct 09 2003

Status

approved