%I A113225
%S A113225 1,1,3,6,15,35,85,204,493,1189,2871,6930,16731,40391,97513,235416,
%T A113225 568345,1372105,3312555,7997214,19306983,46611179,112529341,271669860,
%U A113225 655869061,1583407981,3822685023,9228778026,22280241075,53789260175
%N A113225 a(2n) = A011900(n), a(2n+1) = A001109(n+1).
%C A113225 a(n+1) - a(n) = A097075(n+1), a(n) + a(n+1) = A024537(n+1), a(n+2) - 
               a(n+1) - a(n) = A105635(n+1)
%D A113225 C. Dement, Floretion Integer Sequences (work in progress).
%F A113225 G.f.: y/(y^2-1) where y=x/(x^2+x-1) if offset=1. - Michael Somos Sep 
               09 2006
%F A113225 G.f.: (-1+x+x^2)/((1-x)*(x+1)*(x^2+2*x-1)).
%F A113225 Diagonal sums of A119468. - Paul Barry (pbarry(AT)wit.ie), May 21 2006
%p A113225 seq(iquo(fibonacci(n,2),1)-iquo(fibonacci(n,2),2),n=1..30); - Zerinvary 
               Lajos (zerinvarylajos(AT)yahoo.com), Apr 20 2008
%p A113225 with(combinat):seq(ceil(fibonacci(n,2)/2), n=1..30);# [From Zerinvary 
               Lajos (zerinvarylajos(AT)yahoo.com), Jan 12 2009]
%o A113225 Floretion Algebra Multiplication Program, FAMP Code: -2jbasejseq[B*C], 
               B = - .5'i + .5'j - .5i' + .5j' - 'kk' - .5'ik' - .5'jk' - .5'ki' 
               - .5'kj'; C = + .5'i + .5i' + .5'ii' + .5e
%o A113225 (PARI) {a(n)=local(y); if(n<0, 0, n++; y=x/(x^2+x-1)+x*O(x^n); polcoeff( 
               y/(y^2-1), n))} /* Michael Somos Sep 09 2006 */
%Y A113225 Cf. A113224, A002315, A082639, A100828.
%Y A113225 Sequence in context: A027600 A024416 A076375 this_sequence A017924 A052827 
               A033192
%Y A113225 Adjacent sequences: A113222 A113223 A113224 this_sequence A113226 A113227 
               A113228
%K A113225 easy,nonn
%O A113225 0,3
%A A113225 Creighton Dement (creighton.k.dement(AT)uni-oldenburg.de), Oct 18 2005