|
| |
|
|
A135043
|
|
Possible sums of digits of cubes.
|
|
2
| |
|
|
1, 8, 9, 10, 17, 18, 19, 26, 27, 28, 35, 36, 37, 44, 45, 46, 53, 54, 55, 62, 63, 64, 71, 72, 73, 80, 81, 82, 89, 90, 91, 98, 99, 100, 107, 108, 109, 116, 117, 118, 125, 126, 127, 134, 135, 136
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Minimal n's with corresponding sum-of-digits(n^3) are: 1, 2, 3, 4, 14, 9, 13, 26, 27, 19, 53, 66, 76, 92, 132, 157, 353, 423, 559, 842, 927, 1192, 2129, 3846, 1966, 4289, 5826, 8782, 12116, 16299, 19129, 12599, 41013, 30355, 63413, 66942, 99829, 138899, 265413, 215083, 341075, 506499, 573859
|
|
|
FORMULA
| a(1)=1, a(2)=8, a(3)=9, a(4)=10, a(n>4)=a(n-3)+9.
O.g.f.: 3/(-1+x)^2+3/(-1+x)-2*x/(x^2+x+1) . a(n) = A008585(n+1)-3+(-1)^n*A130772(n-1) . - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 14 2008
|
|
|
MATHEMATICA
| Union[Total[IntegerDigits[#]]&/@(Range[1000000]^3)] [From Harvey P. Dale, Feb. 1, 2011]
t = {1, 8, 9, 10}; Do[AppendTo[t, t[[-3]] + 9], {50}]; t
|
|
|
CROSSREFS
| Sequence in context: A091417 A069237 A070480 * A054966 A130881 A048020
Adjacent sequences: A135040 A135041 A135042 * A135044 A135045 A135046
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Feb 11 2008
|
| |
|
|
