|
|
|
|
0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1, 5, 0, 7, 2, 0, 4, 8, 0, 1
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) = a(n-9) for n > 8.
G.f.: -x*(8*x^7 + 4*x^6 + 2*x^4 + 7*x^3 + 5*x + 1)/(x^9 - 1). (End)
|
|
MATHEMATICA
|
PowerMod[Range[0, 100], 5, 9] (* or *) PadRight[{}, 110, {0, 1, 5, 0, 7, 2, 0, 4, 8}] (* Harvey P. Dale, Jun 15 2022 *)
|
|
PROG
|
(Sage) [power_mod(n, 5, 9)for n in range(0, 101)] # - Zerinvary Lajos, Jun 08 2009
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|