|
|
A303296
|
|
Digital roots of fourth powers A000583.
|
|
1
|
|
|
1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9, 1, 7, 9, 4, 4, 9, 7, 1, 9
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
This sequence is related to A056992, the digital roots of the squares, and also presents a period of 9, in this case repeat [1, 7, 9, 4, 4, 9, 7, 1, 9].
a(n) = 9 if n is a multiple of 3.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Table[FixedPoint[Total[IntegerDigits[#]] &, n^4], {n, 90}]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|