login
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
OFFSET
1,1
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
Sequence in context: A197771 A198056 A360644 * A202079 A296685 A281030
KEYWORD
nonn
STATUS
approved