|
| |
|
|
A099837
|
|
Expansion of (1 - x^2) / (1 + x + x^2) in powers of x.
|
|
28
|
|
|
|
1, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1, 2, -1, -1
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,4
|
|
|
COMMENTS
|
A transform of (-1)^n.
Row sums of Riordan array ((1-x)/(1+x),x/(1+x)^2), A110162.
Let b(n)=sum{k=0..floor(n/2), binomial(n-k,k)(-1)^(n-2k)}. Then a(n)=b(n)-b(n-2)=A049347(n)-A049347(n-2) (n>0). The g.f. 1/(1+x) of (-1)^n is transformed to (1-x^2)/(1+x+x^2) under the mapping G(x)->((1-x^2)/(1+x^2))G(x/(1+x^2)). Partial sums of A099838.
|
|
|
LINKS
|
Table of n, a(n) for n=0..71.
M. Somos, Rational Function Multiplicative Coefficients
|
|
|
FORMULA
|
G.f.: (1-x^2)/(1+x+x^2); a(n)=sum{j=0..n, (C(1, j/2)(-1)^(j/2)(1+(-1)^j)/2)*sum{k=0..floor((n-j)/2), C(n-j-k, k)(-1)^(n-j-k)}}; a(n)=2cos(2*pi*n/3)-0^n.
Euler transform of length 3 sequence [ -1, -1, 1]. - Michael Somos, Mar 21 2011
Moebius transform is length 3 sequence [ -1, 0, 3]. - Michael Somos, Mar 22 2011
a(n) = -b(n) where b(n) = A061347(n) is multiplicative with b(3^e) = -2 if e>0, b(p^e) = 1 otherwise. - Michael Somos, Jan 19 2012
a(n) = a(-n). a(n) = c_3(n) if n>1 where c_k(n) is Ramanujan's sum. - Michael Somos, Mar 21 2011
G.f.: (1 - x) * (1 - x^2) / (1 - x^3). a(n) = -a(n-1) - a(n-2) unless n=0, 1, 2. - Michael Somos, Jan 19 2012
Dirichlet g.f. sum_{n>=1} a(n)/n^s = zeta(s)*(3^(1-s)-1). - R. J. Mathar, Apr 11 2011
|
|
|
EXAMPLE
|
1 - x - x^2 + 2*x^3 - x^4 - x^5 + 2*x^6 - x^7 - x^8 + 2*x^9 - x^10 + ...
|
|
|
MATHEMATICA
|
a[0] = 1; a[n_] := Mod[n+2, 3] - Mod[n, 3]; A099837 = Table[a[n], {n, 0, 71}](* From Jean-François Alcover, Feb 15 2012, after Michael Somos *)
|
|
|
PROG
|
(PARI) {a(n) = [2, -1, -1][n%3 + 1] - (n == 0)} /* Michael Somos, Jan 19 2012 */
(Maxima) A099837(n) := block(
if n = 0 then 1 else [2, -1, -1][1+mod(n, 3)]
)$ /* R. J. Mathar, Mar 19 2012 */
|
|
|
CROSSREFS
|
Cf. A061347, A100051, A100063, A098554.
Sequence in context: A205375 A016010 A131713 * A100051 A122876 A100063
Adjacent sequences: A099834 A099835 A099836 * A099838 A099839 A099840
|
|
|
KEYWORD
|
easy,sign
|
|
|
AUTHOR
|
Paul Barry, Oct 27 2004
|
|
|
STATUS
|
approved
|
| |
|
|
