A130873 Sums of two distinct prime 4th powers.

97, 641, 706, 2417, 2482, 3026, 14657, 14722, 15266, 17042, 28577, 28642, 29186, 30962, 43202, 83537, 83602, 84146, 85922, 98162, 112082, 130337, 130402, 130946, 132722, 144962, 158882, 213842, 279857, 279922, 280466, 282242, 294482, 308402

Offset: 1

Author

Jonathan Vos Post, Jul 24 2007

Keywords

• easy
• nonn

Comments

This is to 4th powers as A120398 is to cubes.

Crossrefs

Cf. A030514, A120398.

Programs

Mathematica

Select[Sort[ Flatten[Table[Prime[n]^4 + Prime[k]^4, {n, 15}, {k, n - 1}]]], # <= Prime[15^4] &]
Total/@Subsets[Prime[Range[10]]^4,{2}]//Union (* Harvey P. Dale, Oct 20 2024 *)