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 A180088 #5 Feb 11 2016 22:57:21
%S A180088 1009,4229,4447,4733,6301,7561,10657,12377,12979,13103,13859,14561,
%T A180088 15569,15667,17207,20663,20747,20899,21673,22511,24137,24499,25999,
%U A180088 27793,27917,28001,28493,28729,29917,31123,32579,32833,32957,33119
%N A180088 Primes which are the sum of three distinct positive cubes in two or more distinct ways.
%C A180088 1^3+2^3+10^3=1009=4^3+6^3+9^3
%H A180088 Chai Wah Wu, <a href="/A180088/b180088.txt">Table of n, a(n) for n = 1..10000</a>
%t A180088 lst1=Sort@Select[Flatten[Table[a^3+b^3+c^3,{a,1,66},{b,a-1,1,-1},{c,b-1,1,-1}]],PrimeQ[ # ]&]; lst={};Do[If[lst1[[n]]==lst1[[n+1]],AppendTo[lst,lst1[[n]]]],{n,Length[lst1]-1}];lst
%Y A180088 Cf. A011541, A024974, A025400, A122723
%K A180088 nonn
%O A180088 1,1
%A A180088 _Vladimir Joseph Stephan Orlovsky_, Aug 09 2010