cp's OEIS Frontend

A100828 Expansion of (1+2*x-2*x^3-3*x^2)/((x-1)*(x+1)*(x^2+2*x-1)).

%I A100828 #18 Mar 14 2024 13:53:10
%S A100828 1,4,7,18,41,100,239,578,1393,3364,8119,19602,47321,114244,275807,
%T A100828 665858,1607521,3880900,9369319,22619538,54608393,131836324,318281039,
%U A100828 768398402,1855077841,4478554084,10812186007,26102926098,63018038201
%N A100828 Expansion of (1+2*x-2*x^3-3*x^2)/((x-1)*(x+1)*(x^2+2*x-1)).
%C A100828 A floretion-generated sequence relating NSW and Pell numbers.
%C A100828 Elements of odd index in the sequence gives A002315. a(n+2) - a(n) = A002203(n+2).
%C A100828 Floretion Algebra Multiplication Program, FAMP Code: 2tesseq[B*C} with B = - .25'i + .25'j + .5'k - .25i' + .25j' + .5k' - .5'kk' - .25'ik' - .25'jk' - .25'ki' - .25'kj' - .5e and C = + .5'i - .25'j + .25'k + .5i' - .25j' + .25k' - .5'ii' - .25'ij' - .25'ik' - .25'ji' - .25'ki' - .5e
%H A100828 Colin Barker, <a href="/A100828/b100828.txt">Table of n, a(n) for n = 0..1000</a>
%H A100828 Robert Munafo, <a href="http://www.mrob.com/pub/math/seq-floretion.html">Sequences Related to Floretions</a>
%H A100828 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (2,2,-2,-1).
%F A100828 a(n) = (u^(n+1)+1)*(v^(n+1)+1)/2 with u = 1+sqrt(2), v = 1-sqrt(2). - _Vladeta Jovovic_, May 30 2007
%F A100828 From _Colin Barker_, Apr 29 2019: (Start)
%F A100828 G.f.: (1 + 2*x - 3*x^2 - 2*x^3) / ((1 - x)*(1 + x)*(1 - 2*x - x^2)).
%F A100828 a(n) = (1 + (-1)^(1+n) + (1-sqrt(2))^(1+n) + (1+sqrt(2))^(1+n)) / 2.
%F A100828 a(n) = 2*a(n-1) + 2*a(n-2) - 2*a(n-3) - a(n-4) for n>3.
%F A100828 (End)
%o A100828 (PARI) Vec((1 + 2*x - 3*x^2 - 2*x^3) / ((1 - x)*(1 + x)*(1 - 2*x - x^2)) + O(x^30)) \\ _Colin Barker_, Apr 29 2019
%Y A100828 Cf. A002315, A002203.
%K A100828 easy,nonn
%O A100828 0,2
%A A100828 _Creighton Dement_, Jan 06 2005; revised Aug 22 2005