A139504 Primes of the form x^2 + 24x*y + y^2 for x and y nonnegative.

53, 113, 157, 181, 257, 269, 313, 389, 433, 521, 641, 653, 757, 797, 829, 881, 1013, 1049, 1093, 1109, 1153, 1193, 1213, 1277, 1301, 1433, 1453, 1609, 1621, 1637, 1741, 1873, 1901, 1973, 2029, 2161, 2237, 2297, 2341, 2357, 2473, 2557, 2677, 2729, 2753

Offset: 1

Author

Artur Jasinski, Apr 24 2008

Keywords

• nonn

Links

• N. J. A. Sloane et al., Binary Quadratic Forms and OEIS (Index to related sequences, programs, references)

Crossrefs

Cf. A139489, A007645, A068228, A007519, A033212, A033212, A107152, A107008, A033215, A107145, A139490, A139491.

Programs

Mathematica

a = {}; w = 24; k = 1; Do[Do[If[PrimeQ[n^2 + w*n*m + k*m^2], AppendTo[a, n^2 + w*n*m + k*m^2]], {n, m, 400}], {m, 1, 400}]; Union[a] (*Artur Jasinski*)