A003349 Numbers that are the sum of 4 positive 5th powers.
4, 35, 66, 97, 128, 246, 277, 308, 339, 488, 519, 550, 730, 761, 972, 1027, 1058, 1089, 1120, 1269, 1300, 1331, 1511, 1542, 1753, 2050, 2081, 2112, 2292, 2323, 2534, 3073, 3104, 3128, 3159, 3190, 3221, 3315, 3370, 3401, 3432, 3612, 3643, 3854, 4096, 4151, 4182, 4213
Offset: 1
Examples
From _David A. Corneth_, Aug 03 2020: (Start) 670593 is in the sequence as 670593 = 1^5 + 8^5 + 10^5 + 14^5. 862512 is in the sequence as 862512 = 7^5 + 9^5 + 12^5 + 14^5. 1892695 is in the sequence as 1892695 = 1^5 + 1^5 + 5^5 + 18^5. (End)
Links
- David A. Corneth, Table of n, a(n) for n = 1..10000 (first 1000 terms from T. D. Noe)
Programs
-
Mathematica
f@n_:= Select[Range@n,IntegerPartitions[#,{4},Range@(n^(1/5))^5] != {} &]; f@10000 (* Hans Rudolf Widmer, Dec 04 2022 *)
Extensions
Incorrect program removed by David A. Corneth, Aug 03 2020