A291850 Numbers k such that k^2 is the sum of two positive 5th powers.
8, 256, 1944, 6655, 8192, 25000, 35937, 62208, 134456, 212960, 262144, 344605, 453962, 472392, 692759, 800000, 1149984, 1288408, 1617165, 1990656, 2970344, 4302592, 6075000, 6814720, 8388608, 8732691, 11358856, 14526784, 15116544, 19808792, 20796875, 22168288
Offset: 1
Keywords
Examples
8^2 = 2^5 + 2^5, so 8 is in the sequence. 6655^2 = 22^5 + 33^5, so 6655 is in the sequence.
Programs
-
Mathematica
lst={};Do[If[IntegerQ[(n^2-a^5)^(1/5)],AppendTo[lst,n]],{n,9000},{a,(n^2/2)^(1/5)}]; lst
-
PARI
upto(n) = { my(res = List(), u = n^2, i5); for(i = 1, sqrtnint(u, 5), i5 = i^5; for(j = i, sqrtnint(u - i5, 5), c = i5 + j^5; if(issquare(c, &sc), listput(res, sc)))); Set(res)} \\ David A. Corneth, Jun 17 2025
Comments