|
Search: id:A065138
|
|
|
| A065138 |
|
Numbers which are equal to the sum of their digits plus the sum of cubes of their digits. |
|
+0
2
|
| |
|
|
OFFSET
|
1,2
|
|
|
REFERENCES
|
Underwood Dudley, Numerology or, what Pythagoras wrought, Spectrum Series, Chapter 7 - Beastly Curiosities, page 71, Mathematical Association of America, Washington, D.C., 1997. [From Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 27 2009]
|
|
LINKS
|
Terry Trotter, Trotter Math. News, 1998
|
|
EXAMPLE
|
12 is included because 12=(1+2)+(1^3+2^3)
|
|
MATHEMATICA
|
fQ[n_] := Block[{id = IntegerDigits@ n}, Plus @@ id + Plus @@ (id^3) == n]; Select[ Range[0, 2000], fQ@# &] [From Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 27 2009]
|
|
CROSSREFS
|
Cf. A046197, A065137.
Sequence in context: A080563 A005147 A007308 this_sequence A008841 A038624 A074299
Adjacent sequences: A065135 A065136 A065137 this_sequence A065139 A065140 A065141
|
|
KEYWORD
|
base,fini,full,nonn
|
|
AUTHOR
|
Henry Bottomley (se16(AT)btinternet.com), Oct 15 2001
|
|
|
Search completed in 0.003 seconds
|
