|
|
A265625
|
|
Differences between two positive cubes in more than two ways.
|
|
8
|
|
|
3367, 26936, 90909, 152551, 205352, 215488, 420875, 622232, 625177, 727272, 754299, 757701, 845208, 1147627, 1154881, 1220408, 1642816, 1723904, 2113921, 2454543, 2741256, 3056473, 3367000, 3442887, 3492125, 4118877, 4481477, 4977856, 5001416, 5544504
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
3367 = 15^3 - 2^3 = 16^3 - 9^3 = 34^3 - 33^3.
|
|
MATHEMATICA
|
r = 5544504; p = 3; Rest@Sort@Drop[Flatten@Select[Tally@Reap[Do[n = i^p - j^p; If[n <= r, Sow[n]], {i, Ceiling[(r/p)^(1/(p - 1))]}, {j, i}]][[2, 1]], #[[2]] > 2 &], {2, -1, 2}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|