A174971 Periodic sequence: Repeat 3, -3.

3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3

Offset

0,1

Comments

Interleaving of A010701 and -A010701; signed version of A010701.

Essentially first differences of A010674.

Inverse binomial transform of 3 followed by A000004.

Second inverse binomial transform of A010701.

Third inverse binomial transform of A007283.

Fourth inverse binomial transform of A000244 without initial term 1.

Fifth inverse binomial transform of A164346.

Sixth inverse binomial transform of A005053 without initial term 1.

Seventh inverse binomial transform of A169604.

Eighth inverse binomial transform of A169634.

Ninth inverse binomial transform of A103333 without initial term 1.

Tenth inverse binomial transform of A013708.

Eleventh inverse binomial transform of A093138 without initial term 1.

Links

Table of n, a(n) for n=0..83.

Index entries for linear recurrences with constant coefficients, signature (-1).

Formula

a(n) = 3*(-1)^n.

a(n) = -a(n-1) for n > 0; a(0) = 3.

a(n) = a(n-2) for n > 1; a(0) = 3, a(1) = -3.

G.f.: 3/(1+x).

Mathematica

PadRight[{}, 120, {3, -3}] (* or *) NestList[-1#&, 3, 120] (* Harvey P. Dale, Dec 30 2023 *)

Prog

(Magma) &cat[ [3, -3]: n in [0..41] ];
[ 3*(-1)^n: n in [0..83] ];
(PARI) a(n)=3*(-1)^n \\ Charles R Greathouse IV, Jun 13 2013

Crossrefs

Cf. A010701 (all 3's sequence), A000004 (all zeros sequence), A007283 (3*2^n), A000244 (powers of 3), A164346 (3*4^n), A005053 (expand (1-2x)/(1-5x)), A169604 (3*6^n), A169634 (3*7^n), A103333 (expand (1-5x)/(1-8x)), A013708 (3^(2n+1)), A093138 (expand (1-7x)/(1-10x)).

Sequence in context: A102818 A010701 A290858 * A122553 A157831 A032552

Adjacent sequences: A174968 A174969 A174970 * A174972 A174973 A174974

Keyword

sign,easy

Author

Klaus Brockhaus, Apr 04 2010

Status

approved