A243175 Numbers of the form x^2 + xy + 7y^2.
0, 1, 4, 7, 9, 13, 16, 19, 25, 27, 28, 31, 36, 37, 43, 49, 52, 61, 63, 64, 67, 73, 76, 79, 81, 91, 97, 100, 103, 108, 109, 112, 117, 121, 124, 127, 133, 139, 144, 148, 151, 157, 163, 169, 171, 172, 175, 181, 189, 193, 196, 199, 208, 211, 217, 223, 225, 229, 241, 243, 244, 247, 252, 256, 259, 268, 271, 277, 279, 283, 289, 292, 301, 304, 307, 313, 316, 324, 325
Offset: 1
Keywords
Links
- N. J. A. Sloane et al., Binary Quadratic Forms and OEIS (Index to related sequences, programs, references)
Programs
-
Mathematica
Select[Range[0, 350], Resolve@Exists[{x, y}, Reduce[# == (x^2 + x y + 7 y^2), {x, y}, Integers]] &] (* Vincenzo Librandi, Feb 11 2020 *)
Comments