|
|
A244291
|
|
Positive numbers primitively represented by the binary quadratic form (1, 6, -3).
|
|
2
|
|
|
1, 4, 13, 24, 33, 37, 52, 61, 69, 73, 88, 97, 109, 121, 132, 141, 148, 157, 169, 177, 181, 184, 193, 213, 229, 241, 244, 249, 253, 276, 277, 292, 312, 313, 321, 337, 349, 373, 376, 388, 393, 397, 409, 421, 429, 433, 436, 457, 472, 481, 484, 501, 517, 529, 537
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Discriminant = 48.
|
|
LINKS
|
|
|
MATHEMATICA
|
Reap[For[n = 1, n < 1000, n++, r = Reduce[x^2 + 6 x y - 3 y^2 == n, {x, y}, Integers]; If[r =!= False, If[AnyTrue[{x, y} /. {ToRules[r /. C[1] -> 0]}, CoprimeQ @@ # &], Sow[n]]]]][[2, 1]] (* Jean-François Alcover, Oct 31 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|