%I A100828
%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)
%F A100828 a(n) = (u^(n+1)+1)*(v^(n+1)+1)/2 with u = 1+sqrt(2), v = 1-sqrt(2). - 
               Vladeta Jovovic (vladeta(AT)eunet.rs), May 30 2007
%o A100828 Floretion Algebra Multiplication Program, FAMP
%o 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
%Y A100828 Cf. A002315, A002203.
%Y A100828 Sequence in context: A124400 A077920 A135582 this_sequence A132207 A097537 
               A032723
%Y A100828 Adjacent sequences: A100825 A100826 A100827 this_sequence A100829 A100830 
               A100831
%K A100828 easy,nonn
%O A100828 0,2
%A A100828 Creighton Dement (creighton.k.dement(AT)uni-oldenburg.de), Jan 06 2005; 
               revised Aug 22 2005