[go: up one dir, main page]

login
A139510
Primes of the form x^2 + 30x*y + y^2 for x and y nonnegative.
1
137, 193, 401, 617, 641, 953, 1009, 1129, 1289, 1297, 1801, 1913, 2129, 2137, 2377, 2473, 2657, 2713, 2801, 3049, 3257, 3313, 3329, 3593, 3889, 4001, 4057, 4153, 4201, 4337, 4649, 4657, 4729, 4817, 4937, 4993, 5009, 5153, 5209, 5441, 5657, 5849, 5881
OFFSET
1,1
LINKS
N. J. A. Sloane et al., Binary Quadratic Forms and OEIS (Index to related sequences, programs, references)
MATHEMATICA
a = {}; w = 30; 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*)
KEYWORD
nonn
AUTHOR
Artur Jasinski, Apr 24 2008
STATUS
approved