%I A121803
%S A121803 0,28,432,2083,11262,54976,274107,1345543,6629946,32586349,160268532,
%T A121803 787926091,3874117269,19047230005,93648237255,460429207264,
%U A121803 2263745709876,11129911057732,54721250218635,269042081326366
%N A121803 a(n)= 7*a(n-1) -4*a(n-2) -45*a(n-3) +64*a(n-4) +55*a(n-5) -128*a(n-6) 
               +52*a(n-7).
%F A121803 G.f.: x^2*(-28-236*x+829*x^2+331*x^3-2122*x^4+1130*x^5)/( (x-1)* (2*x+1) 
               * (2*x-1) * (13*x^4-19*x^3-2*x^2+6*x-1)).
%t A121803 M = {{0, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 0, 1, 1, 0, 1, 0, 0, 0, 
               1, 0, 0}, {1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0}, {1, 1, 1, 0, 0, 0, 
               0, 1, 0, 0, 0, 1}, { 1, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0}, {0, 1, 
               0, 0, 1, 0, 1, 1, 0, 1, 0, 0}, {0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 1, 
               0}, {0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 1, 0, 0, 0, 
               0, 1, 1, 01}, {0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 
               0, 0, 1, 0, 1, 1, 0, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0}} v[1] 
               = Table[Fibonacci[n], {n, 0, 11}] v[n_] := v[n] = M.v[n - 1] a = 
               Table[Floor[v[n][[1]]], {n, 1, 50}]
%Y A121803 Sequence in context: A004415 A096949 A093974 this_sequence A022656 A154588 
               A125485
%Y A121803 Adjacent sequences: A121800 A121801 A121802 this_sequence A121804 A121805 
               A121806
%K A121803 nonn
%O A121803 1,2
%A A121803 Roger Bagula (rlbagulatftn(AT)yahoo.com), Aug 28 2006
%E A121803 Definition replaced by recurrence - The Assoc. Editors of the OEIS, Oct 
               14 2009