|
| |
|
|
A073636
|
|
Digital root of n^3.
|
|
2
| |
|
|
1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9, 1, 8, 9
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Periodic with cycle {1,8,9}.
a(n) is the decimal expansion of 44/37 [From Barbarel Tres Mil (barbarel3000(AT)yahoo.es), Jul 28 2009]
|
|
|
FORMULA
| a(n)=(1/3)*{14*[n mod 3]+5*[(n+1) mod 3]-[(n+2) mod 3]}, with n>=0 - Paolo P. Lava (paoloplava(AT)gmail.com), Jun 08 2007
|
|
|
MATHEMATICA
| n=3; su[x_] := Sum[IntegerDigits[x][[i]], {i, Length[IntegerDigits[x]]}]; Table[su[su[su[su[x^n]]]], {x, 100}]
|
|
|
CROSSREFS
| Cf. A004164, A010888, A021596. Digital roots of squares are in A056992.
Sequence in context: A154904 A155553 A053463 * A113521 A030167 A010767
Adjacent sequences: A073633 A073634 A073635 * A073637 A073638 A073639
|
|
|
KEYWORD
| nonn,base,easy
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Sep 01 2002
|
| |
|
|
