OFFSET
1,1
COMMENTS
Because 4x^2-4*x*y+7*y^2 = (2*x-y)^2+6*y^2, this is a subsequence of A002481. - R. J. Mathar, Jan 18 2021
MATHEMATICA
Do[Do[w = 4x^2 - 4x y + 7y^2; If[w > 0, If[PrimeQ[w], [null], AppendTo[a, w]]], {x, 0, 100}], {y, 0, 100}]; Union[a]
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Nov 25 2007
STATUS
approved