This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
aa = {}; bb = {}; cc = {}; Do[Do[If[((N[Sqrt[x^5 - n], 300] - Round[Sqrt[x^5 - n]])^2 < 10^-300) && (Im[Round[Sqrt[x^5 - n]]] == 0), AppendTo[aa, n]; AppendTo[bb, x]; AppendTo[cc, Round[Sqrt[x^5 - n]]]; Print[{n}, {x}, {Round[Sqrt[x^5 - n]]}]], {x, 1, 1000}], {n, 1, 1000}]; Union[aa]
a(1) = 224 = 15^2-1^5 = 16^2-2^5. a(2) = 356 = 59^2-5^5 = 182^2-8^5. a(3) = 368 = 20^2-2^5 = 45531^2-73^5. a(4) = 433 = 26^2-3^5 = 3447^2-26^5. a(5) = 497 = 23^2-2^5 = 39^2-4^5. a(6) = 657 = 30^2-3^5 = 41^2-4^5. a(7) = 740 = 42^2-4^5 = 12842^2-44^5. a(8) = 1057 = 332^2-2^5 = 1375^2-18^5. a(9) = 1060 = 94^2-6^5 = 2822^2-24^5. a(10) = 1088 = 33^2-1^5 = 184^2-8^5. a(11) = 1124 = 34^2-2^5 = 318^2-10^5. a(12) = 1377 = 49^2-4^5 = 1574^2-19^5. a(13) = 1680 = 41^2-1^5 = 52^2-4^5. a(14) = 1828 = 98^2-6^5 = 186^2-8^5 = 90298^2-96^5.
a(1)=1828 = 98^2-6^5 = 186^2-8^5 = 90298^2-96^5. a(2)=3332 = 58^2-2^5 = 66^2-4^5 = 190^2-8^5. a(3)=4100 = 85^2-5^5 = 1026^2-16^5 = 1790^2-20^5.
Comments