%I A123001
%S A123001 0,1,1,10,19,109,280,1261,3781,15130,49159,185329,627760,2295721,
%T A123001 7945561,28607050,100117099,357580549,1258634440,4476859381,15804569341,
%U A123001 56096303770,198337427839,703204161769,2488241012320,8817078468241
%N A123001 a(n)=a(n-1)+9a(n-2), a(1)=0, a(2)=1.
%F A123001 a(n)=A015445(n-2). - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jun 
               18 2008
%F A123001 a(n)=(1/37)*[1/2+(1/2)*sqrt(37)]^n*sqrt(37)-(1/37)*[1/2-(1/2)*sqrt(37)]^n*sqrt(37), 
               with n>=0 [From Paolo P. Lava (ppl(AT)spl.at), Oct 01 2008]
%t A123001 m = 3; f[n_Integer] = Module[{a}, a[n] /. RSolve[{a[n] == a[n - 1]/m 
               + a[n - 2], a[0] == 0, a[1] == 1}, a[n], n][[1]] // FullSimplify] 
               ; a = Table[Rationalize[N[f[n]*m^(n - 1), 100], 0], {n, 0, 25}]
%Y A123001 Cf. A026595.
%Y A123001 Sequence in context: A060630 A070199 A015445 this_sequence A073222 A110463 
               A121725
%Y A123001 Adjacent sequences: A122998 A122999 A123000 this_sequence A123002 A123003 
               A123004
%K A123001 nonn
%O A123001 1,4
%A A123001 Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 22 2006
%E A123001 Edited by N. J. A. Sloane (njas(AT)research.att.com), Oct 15 2006