# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a131531 Showing 1-1 of 1 %I A131531 #44 Mar 28 2024 21:54:46 %S A131531 0,0,1,0,0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0, %T A131531 1,0,0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0,1,0, %U A131531 0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0,1,0,0,-1,0,0 %N A131531 Period 6: repeat [0, 0, 1, 0, 0, -1]. %C A131531 Also: partial sums of A092220 shifted by two indices. - _R. J. Mathar_, Feb 08 2008 %C A131531 From _Paul Curtz_, Jun 05 2011: (Start) %C A131531 The square array of this sequence in the top row and further rows defined as first differences of preceding rows starts (see A167613): %C A131531 . 0, 0, 1, 0, 0, -1, ... %C A131531 . 0, 1, -1, 0, -1, 1, ... = A092220, %C A131531 . 1, -2, 1, -1, 2, -1, ... = A131556, %C A131531 . -3, 3, -2, 3, -3 2, ... %C A131531 . 6, -5, 5, -6, 5, -5, ... %C A131531 . -11, 10, -11, 11, -10, 11, ... %C A131531 . 21, -21, 22, -21, 21, -22, ... %C A131531 . -42, 43, -43, 42, -43, 43, ... %C A131531 The main diagonal in this array is A001045; the first superdiagonal is the negated elements of A001045, the second superdiagonal is A078008. %C A131531 The left column of the array is basically the inverse binomial transform, (-1)^n * A024495(n), assuming offset 0. %C A131531 The second column of the array is A131708 with alternating signs, and the third column is A024493 with alternating signs (both assuming offset 0). (End) %H A131531 Index entries for linear recurrences with constant coefficients, signature (0,0,-1). %F A131531 G.f.: x^3/(x+1)/(x^2-x+1). - _R. J. Mathar_, Nov 14 2007 %F A131531 a(n) = (-A057079(n+1) - (-1)^n)/3. - _R. J. Mathar_, Jun 13 2011 %F A131531 a(n) = -cos(Pi*(n-1)/3)/3 + sin(Pi*(n-1)/3)/sqrt(3) - (-1)^n/3. - _R. J. Mathar_, Oct 08 2011 %F A131531 a(n) = ( (-1)^n - (-1)^floor((n+2)/3) )/2. - _Bruno Berselli_, Jul 09 2013 %F A131531 a(n) + a(n-3) = 0 for n > 3. - _Wesley Ivan Hurt_, Jun 20 2016 %p A131531 A131531:=n->[0, 0, 1, 0, 0, -1][(n mod 6)+1]: seq(A131531(n), n=0..100); # _Wesley Ivan Hurt_, Jun 20 2016 %t A131531 PadRight[{}, 120, {0,0,1,0,0,-1}] (* _Harvey P. Dale_, Nov 11 2012 *) %o A131531 (PARI) a(n)=[0,0,1,0,0,-1][n%6+1] \\ _Charles R Greathouse IV_, Jun 01 2011 %o A131531 (Magma) &cat[[0, 0, 1, 0, 0, -1]^^20]; // _Wesley Ivan Hurt_, Jun 20 2016 %Y A131531 Cf. A001045, A024493, A024495, A078008, A092220, A131556, A131708, A167613. %K A131531 sign,easy %O A131531 1,1 %A A131531 _Paul Curtz_, Aug 26 2007 %E A131531 Edited by _N. J. A. Sloane_, Sep 15 2007 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE