|
| |
|
|
A198517
|
|
Period 5: repeat 1,0,1,0,0.
|
|
4
|
|
|
|
1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0
|
|
|
COMMENTS
|
Unsigned version of A105385; also partial sums of A156174.
|
|
|
LINKS
|
Table of n, a(n) for n=0..87.
Index to sequences with linear recurrences with constant coefficients, signature (0,0,0,0,1).
|
|
|
FORMULA
|
G.f.: (1+x^2)/(1-x^5).
a(n) = a(-n+2) = (1/25)*(-4*(n mod 5)+((n+1) mod 5)+6*((n+2) mod 5)-4*((n+3) mod 5)+6*((n+4) mod 5)).
a(n)+a(n+1)+a(n+2) = A177706(n+4).
a(n)-a(n+2)+a(n+4) = A011658(n+2).
a(n) = ((n+4)^2 mod 5 + (n+4)^4 mod 5)/2. - Gary Detlefs, May 29 2012
|
|
|
MATHEMATICA
|
PadRight[{}, 120, {1, 0, 1, 0, 0}] (* Harvey P. Dale, Dec 09 2012 *)
|
|
|
PROG
|
(MAGMA) &cat[[1, 0, 1, 0, 0]: n in [0..17]];
(PARI) a(n)=n%5==0 || n%5==2 \\ Charles R Greathouse IV, Oct 28 2011
|
|
|
CROSSREFS
|
Cf. A079998.
Cf. A057354 (partial sums, without initial zeros).
Sequence in context: A190236 A190224 A186518 * A190227 A187950 A188467
Adjacent sequences: A198514 A198515 A198516 * A198518 A198519 A198520
|
|
|
KEYWORD
|
nonn,easy,changed
|
|
|
AUTHOR
|
Bruno Berselli, Oct 27 2011
|
|
|
STATUS
|
approved
|
| |
|
|