|
| |
|
|
A135050
|
|
Numbers n such that sum of digits of n^3 is 8. Multiples of 10 are omitted.
|
|
0
| |
|
|
2, 5, 8, 11, 101, 1001, 10001, 100001, 1000001, 10000001, 100000001, 1000000001, 10000000001, 100000000001, 1000000000001, 10000000000001, 100000000000001, 1000000000000001, 10000000000000001, 100000000000000001, 1000000000000000001, 10000000000000000001
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| All numbers of form 10..01 are eligible. Are there larger terms of other forms?
All terms up to 10^20 are of this form, except for 2, 5 and 8. - Max Alekseyev, Feb 11 2008
|
|
|
EXAMPLE
| 2^3=8, 5^3=125, 8^3=512, 11^3=1331, 101^3=1010301, 1001^3=1003003001, 10001^3=1000300030001.
|
|
|
MATHEMATICA
| Do[If[Total[IntegerDigits[m^3]]==8&&Mod[m, 10]>0, Print[m]], {m, 100000}]
|
|
|
CROSSREFS
| Sequence in context: A107679 A018846 A056661 * A004112 A024815 A073837
Adjacent sequences: A135047 A135048 A135049 * A135051 A135052 A135053
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Feb 11 2008
|
|
|
EXTENSIONS
| a(9) onwards from Max Alekseyev, Feb 11 2008
|
| |
|
|
