A139498 Primes of the form x^2 + 17x*y + y^2 for x and y nonnegative.

19, 61, 139, 199, 229, 271, 349, 499, 541, 571, 619, 631, 691, 709, 739, 769, 859, 919, 1051, 1069, 1201, 1279, 1429, 1489, 1531, 1621, 1669, 1759, 1831, 1879, 1999, 2011, 2221, 2239, 2251, 2281, 2341, 2551, 2671, 2791, 2851, 2971, 3019, 3049, 3079, 3121

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 = 17; 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*)