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 A125111 #19 Dec 03 2024 15:10:43
%S A125111 27,216,343,1331,1728,2744,3375,6859,9261,10648,12167,13824,19683,
%T A125111 21952,27000,29791,35937,42875,54872,59319,74088,79507,85184,97336,
%U A125111 103823,110592,132651,157464,166375,175616,185193,205379,216000,238328,250047
%N A125111 Cubes which do not have a partition as the sum of 2 squares.
%H A125111 Amiram Eldar, <a href="/A125111/b125111.txt">Table of n, a(n) for n = 1..10000</a>
%F A125111 Equals A000578 INTERSECT A022544. - _R. J. Mathar_, Nov 23 2006
%F A125111 a(n) = A022544(n)^3. - _Ray Chandler_, Nov 23 2006
%t A125111 Select[Range[0, 65]^3, SquaresR[2, # ] == 0 &] (* _Ray Chandler_, Nov 23 2006 *)
%o A125111 (PARI) isA125111(ncube)={ local(a) ; a=0; while(a^2<=ncube, if(issquare(ncube-a^2), return(0) ; ) ; a++ ; ) ; return(1) ; } { for(n=0,200, if(isA125111(n^3), print1(n^3,",") ; ) ; ) ; } \\ _R. J. Mathar_, Nov 23 2006
%Y A125111 Cf. A000578, A022544, A125084, A125110.
%K A125111 nonn
%O A125111 1,1
%A A125111 _Artur Jasinski_, Nov 21 2006
%E A125111 More terms from _R. J. Mathar_ and _Ray Chandler_, Nov 23 2006