|
|
A101852
|
|
Numbers which are the sum of two positive cubes and divisible by 11.
|
|
7
|
|
|
341, 407, 539, 737, 1001, 2662, 2728, 2926, 3256, 3718, 4312, 5038, 5896, 6886, 8008, 9009, 9207, 9262, 9603, 10197, 10989, 11979, 13167, 14553, 16137, 17919, 19899, 21296, 21428, 21824, 22077, 22484, 23408, 24453, 24596, 26048, 27027, 27764
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
upto[n_] := Block[{t}, Union@ Reap[ Do[If[Mod[t = x^3 + y^3, 11] == 0, Sow@t], {x, n^(1/3)}, {y, Min[x, (n - x^3)^(1/3)]}]][[2, 1]]]; upto[28000] (* Giovanni Resta, Jun 12 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Jan 27 2005
|
|
STATUS
|
approved
|
|
|
|