|
Search: id:A125110
|
|
|
| A125110 |
|
Cubes which have a partition as the sum of 2 squares. |
|
+0
3
|
|
| 0, 1, 8, 64, 125, 512, 729, 1000, 2197, 4096, 4913, 5832, 8000, 15625, 17576, 24389, 32768, 39304, 46656, 50653, 64000, 68921, 91125, 117649, 125000, 140608, 148877, 195112, 226981, 262144, 274625, 314432, 373248, 389017, 405224, 512000, 531441
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
FORMULA
|
Equals A000578 INTERSECT A001481. - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Nov 23 2006
a(n) = A001481(n)^3. (Chandler)
|
|
EXAMPLE
|
125=5^3=2^2+11^2=A001481(54)=A000578(8).
|
|
MATHEMATICA
|
Needs["NumberTheory`NumberTheoryFunctions`"]; Select[Range[0, 81]^3, SumOfSquaresR[2, # ] > 0 &] (*Chandler*)
|
|
PROGRAM
|
(PARI) isA125110(ncube)={ local(a) ; a=0; while(a^2<=ncube, if(issquare(ncube-a^2), return(1) ; ) ; a++ ; ) ; return(0) ; } { for(n=0, 200, if(isA125110(n^3), print1(n^3, ", ") ; ) ; ) ; } - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Nov 23 2006
|
|
CROSSREFS
|
Cf. A125084, A125111, A001481.
Sequence in context: A118719 A134739 A116978 this_sequence A043152 A044195 A153808
Adjacent sequences: A125107 A125108 A125109 this_sequence A125111 A125112 A125113
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Nov 21 2006
|
|
EXTENSIONS
|
Corrected and extended by R. J. Mathar (mathar(AT)strw.leidenuniv.nl) and Ray Chandler (rayjchandler(AT)sbcglobal.net), Nov 23 2006
|
|
|
Search completed in 0.002 seconds
|
