This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A025408 #12 Jul 31 2013 05:56:47
%S A025408 100,161,198,217,224,252,289,308,315,350,369,376,379,406,413,416,432,
%T A025408 435,442,477,496,503,533,540,548,559,568,585,587,594,604,611,624,631,
%U A025408 646,650,665,672,685,692,702,709,711,728,737,748,756,763,765,793,800,802,819,821,828,854,861,863,864,880,882,883,889,890,917,919,920,926,927,945,946,954,973,980,981,988,1007,1010,1017,1044
%N A025408 Numbers that are the sum of 4 distinct positive cubes in exactly 1 way.
%C A025408 First differs from A025411 at a(80)=1044. - _Ray Chandler_, Feb 19 2005.
%t A025408 Reap[For[n = 1, n <= 1200, n++, pr = Select[ PowersRepresentations[n, 4, 3], Times @@ # != 0 && Length[#] == Length[Union[#]] &]; If[pr != {} && Length[pr] == 1, Print[n, pr]; Sow[n]]]][[2, 1]] (* _Jean-François Alcover_, Jul 31 2013 *)
%K A025408 nonn
%O A025408 1,1
%A A025408 _David W. Wilson_
%E A025408 More terms from _Ray Chandler_, Feb 19 2005.