login
A130873
Sums of two distinct prime 4th powers.
7
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,1
COMMENTS
This is to 4th powers as A120398 is to cubes.
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 *)
CROSSREFS
Sequence in context: A144131 A362321 A130833 * A193411 A094479 A096326
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Jul 24 2007
STATUS
approved