|
|
A004801
|
|
Sum of 12 positive 9th powers.
|
|
41
|
|
|
12, 523, 1034, 1545, 2056, 2567, 3078, 3589, 4100, 4611, 5122, 5633, 6144, 19694, 20205, 20716, 21227, 21738, 22249, 22760, 23271, 23782, 24293, 24804, 25315, 39376, 39887, 40398, 40909, 41420, 41931, 42442, 42953, 43464, 43975, 44486, 59058, 59569
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
nMax = 10^6; n = 12; lst = {}; While[s = Select[Total /@ (IntegerPartitions[n, {12}]^9), # <= nMax &]; s != {}, lst = Join[lst, s]; n++]; Union[lst] (* T. D. Noe, Apr 11 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|