[go: up one dir, main page]

login
A135537
Period 4: repeat [7, 5, 2, 4].
0
7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5, 2, 4, 7, 5
OFFSET
0,1
FORMULA
a(n) = A135536(n) mod 9.
O.g.f.: ((x+5)/(x^2+1)+9*(1-x))/2. a(n) = ((-1)^floor(n/2) * A010686(n+1) + 9)/2. - R. J. Mathar, Feb 23 2008
From Wesley Ivan Hurt, Jul 08 2016: (Start)
a(n) = a(n-1) - a(n-2) + a(n-3) for n>2, a(n) = a(n-4) for n>3.
a(n) = A021408(n) for n>1. (End)
MAPLE
seq(op([7, 5, 2, 4]), n=0..50); # Wesley Ivan Hurt, Jul 08 2016
MATHEMATICA
Flatten[Table[{7, 5, 2, 4}, {20}]] (* Harvey P. Dale, Jun 22 2011 *)
PROG
(Magma) &cat [[7, 5, 2, 4]^^30]; // Wesley Ivan Hurt, Jul 08 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paul Curtz, Feb 22 2008
STATUS
approved