A003365 Numbers that are the sum of 9 positive 6th powers.
9, 72, 135, 198, 261, 324, 387, 450, 513, 576, 737, 800, 863, 926, 989, 1052, 1115, 1178, 1241, 1465, 1528, 1591, 1654, 1717, 1780, 1843, 1906, 2193, 2256, 2319, 2382, 2445, 2508, 2571, 2921, 2984, 3047, 3110, 3173, 3236, 3649, 3712, 3775, 3838, 3901, 4104, 4167, 4230
Offset: 1
Examples
From _David A. Corneth_, Aug 03 2020: (Start) 124882 is in the sequence as 124882 = 2^6 + 2^6 + 2^6 + 2^6 + 2^6 + 5^6 + 5^6 + 6^6 + 6^6. 188939 is in the sequence as 188939 = 2^6 + 2^6 + 3^6 + 3^6 + 3^6 + 6^6 + 6^6 + 6^6 + 6^6. 257236 is in the sequence as 257236 = 3^6 + 3^6 + 4^6 + 4^6 + 4^6 + 4^6 + 4^6 + 7^6 + 7^6. (End)
Links
- David A. Corneth, Table of n, a(n) for n = 1..10000 (first 1000 terms from T. D. Noe)
Crossrefs
Cf. A001014 (sixth powers).
Programs
-
Mathematica
Reap[For[n = 1, n <= 3000, n++, If[AnyTrue[PowersRepresentations[n, 9, 6], First[#] > 0&], Print[n]; Sow[n]]]][[2, 1]] (* Jean-François Alcover, Jul 18 2017 *)