A082658 Integers expressible as the sum of a square and a triangular number in exactly two distinct ways.
7, 15, 22, 26, 28, 31, 40, 45, 52, 55, 59, 61, 67, 79, 85, 87, 92, 94, 100, 102, 103, 106, 114, 115, 124, 130, 140, 142, 147, 155, 157, 159, 166, 175, 178, 180, 184, 187, 189, 190, 191, 197, 202, 205, 206, 210, 211, 214, 220, 224, 231, 232, 240, 241, 246, 247
Offset: 1
Keywords
Examples
a(4) = 26 because 26 = 1 + 25; 26 = 10 + 16.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
aQ[n_] := Length @ Solve[x^2 + y (y + 1)/2 == n && x >= 0 && y > 0, {x, y}, Integers] == 2; Select[Range[250], aQ] (* Amiram Eldar, Dec 08 2019 *)
Extensions
Name clarified by Amiram Eldar, Dec 08 2019
Comments