A201917 Nonnegative values x of solutions (x, y) to the Diophantine equation x^2 + (x+84847)^2 = y^2.
0, 2085, 2325, 5253, 6141, 6293, 7728, 10013, 11960, 12920, 14637, 16940, 17112, 18737, 21648, 21948, 23541, 24633, 26588, 27716, 31620, 33012, 34937, 35145, 38012, 40641, 42716, 44268, 47633, 49848, 52785, 54237, 56420, 56840, 60605, 63828, 67541, 70448
Offset: 1
Keywords
Links
- Vincenzo Librandi and T. D. Noe, Table of n, a(n) for n = 1..1000 (first 159 terms from Vincenzo Librandi)
Crossrefs
Cf. A201916 (has list of all such sequences).
Programs
-
Mathematica
d = 84847; t = Select[Range[0,68000], IntegerQ[Sqrt[#^2 + (#+d)^2]] &]
Formula
a(n) = a(n-1) + 6*a(n-81) - 6*a(n-82) - a(n-162) + a(n-163), where the 163 initial terms can be computed using the Mathematica program. The initial terms begin with 0 and end with 1696940.
Comments