|
%I #10 Dec 30 2023 14:53:40
%S 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,
%T -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,
%U 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
%N Periodic sequence: Repeat 3, -3.
%C Interleaving of A010701 and -A010701; signed version of A010701.
%C Essentially first differences of A010674.
%C Inverse binomial transform of 3 followed by A000004.
%C Second inverse binomial transform of A010701.
%C Third inverse binomial transform of A007283.
%C Fourth inverse binomial transform of A000244 without initial term 1.
%C Fifth inverse binomial transform of A164346.
%C Sixth inverse binomial transform of A005053 without initial term 1.
%C Seventh inverse binomial transform of A169604.
%C Eighth inverse binomial transform of A169634.
%C Ninth inverse binomial transform of A103333 without initial term 1.
%C Tenth inverse binomial transform of A013708.
%C Eleventh inverse binomial transform of A093138 without initial term 1.
%H <a href="/index/Rec#order_01">Index entries for linear recurrences with constant coefficients</a>, signature (-1).
%F a(n) = 3*(-1)^n.
%F a(n) = -a(n-1) for n > 0; a(0) = 3.
%F a(n) = a(n-2) for n > 1; a(0) = 3, a(1) = -3.
%F G.f.: 3/(1+x).
%t PadRight[{},120,{3,-3}] (* or *) NestList[-1#&,3,120] (* _Harvey P. Dale_, Dec 30 2023 *)
%o (Magma) &cat[ [3, -3]: n in [0..41] ];
%o [ 3*(-1)^n: n in [0..83] ];
%o (PARI) a(n)=3*(-1)^n \\ _Charles R Greathouse IV_, Jun 13 2013
%Y 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)).
%K sign,easy
%O 0,1
%A _Klaus Brockhaus_, Apr 04 2010
|
