%I A106709
%S A106709 0,2,10,46,210,958,4370,19934,90930,414782,1892050,8630686,39369330,
%T A106709 179585278,819187730,3736768094,17045465010,77753788862,354678014290,
%U A106709 1617882493726,7380056440050,33664517212798,153562473183890
%V A106709 0,-2,-10,-46,-210,-958,-4370,-19934,-90930,-414782,-1892050,-8630686,
               -39369330,
%W A106709 -179585278,-819187730,-3736768094,-17045465010,-77753788862,-354678014290,
%X A106709 -1617882493726,-7380056440050,-33664517212798,-153562473183890
%N A106709 First entry of the vector (M^n)v, where M is the 2 X 2 matrix [[0,-2],
               [1,5]] and v is the column vector [0,1].
%C A106709 Real Pisot roots (the eigenvalues of M): 0.438447, 4.56155.
%F A106709 a(n)=first entry of v[n], where v[n]=Mv[n-1], M is the 2 X 2 matrix [[0, 
               -2], [1, 5]] and v[0] is the column vector [0,1].
%p A106709 with(linalg): M:=matrix(2,2,[0,-2,1,5]): v[0]:=matrix(2,1,[0,1]): for 
               n from 1 to 22 do v[n]:=multiply(M,v[n-1]) od: seq(v[n][1,1],n=0..22);
%t A106709 M = {{0, -2}, {1, 5}} v[1] = {0, 1} v[n_] := v[n] = M.v[n - 1] a = Table[Abs[v[n][[1]]], 
               {n, 1, 50}]
%Y A106709 Sequence in context: A137334 A080643 A032389 this_sequence A137193 A006213 
               A137635
%Y A106709 Adjacent sequences: A106706 A106707 A106708 this_sequence A106710 A106711 
               A106712
%K A106709 sign
%O A106709 0,2
%A A106709 Roger L. Bagula (rlbagulatftn(AT)yahoo.com), May 30 2005
%E A106709 Edited by N. J. A. Sloane (njas(AT)research.att.com), Apr 30 2006