This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A093145 #40 Sep 08 2022 08:45:13 %S A093145 0,1,10,80,600,4400,32000,232000,1680000,12160000,88000000,636800000, %T A093145 4608000000,33344000000,241280000000,1745920000000,12633600000000, %U A093145 91417600000000,661504000000000,4786688000000000,34636800000000000 %N A093145 Third binomial transform of Fibonacci(3n)/Fibonacci(3). %C A093145 Fifth binomial transform of 1,5,5,25,25,125. - Al Hakanson (hawkuu(AT)gmail.com), Jul 13 2009 %H A093145 Vincenzo Librandi, <a href="/A093145/b093145.txt">Table of n, a(n) for n = 0..200</a> %H A093145 S. Falcon, <a href="http://dx.doi.org/10.9734/BJMCS/2014/11783">Iterated Binomial Transforms of the k-Fibonacci Sequence</a>, British Journal of Mathematics & Computer Science, 4 (22): 2014. %H A093145 <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (10,-20). %F A093145 G.f.: x/(1 - 10*x + 20*x^2). %F A093145 a(n) = ((5+sqrt(5))^n - (5-sqrt(5))^n)/(2*sqrt(5)). %F A093145 a(n) = Sum_{k=0..n} binomial(n, 2*k+ 1)*5^(n-k-1). %F A093145 a(n) = 10*a(n-1) - 20*a(n-2), n > 1; a(0)=0, a(1)=1. - _Zerinvary Lajos_, Apr 26 2009 %F A093145 G.f.: A(x) = x*G(0)/(1-5*x) where G(k) = 1 + 5*x/(1-5*x - x*(1-5*x)/(x + (1-5*x)/G(k+1) )); (recursively defined continued fraction). - _Sergei N. Gladkovskii_, Dec 30 2012 %t A093145 Join[{a=0,b=1},Table[c=10*b-20*a;a=b;b=c,{n,60}]] (* _Vladimir Joseph Stephan Orlovsky_, Jan 27 2011 *) %t A093145 f[n_] := Block[{s = Sqrt@ 5}, Simplify[((1 + s)(5 + s)^n + (1 - s)(5 - s)^n)/2]]; Array[f, 21, 0] (* Or *) %t A093145 a[n_] := 10 a[n - 1] - 20 a[n - 2]; a[0] = 0; a[1] = 1; Array[a, 22, 0] (* Or *) %t A093145 CoefficientList[Series[x/(1 - 10 x + 20 x^2), {x, 0, 21}], x] (* _Robert G. Wilson v_, Mar 07 2011 *) %t A093145 LinearRecurrence[{10,-20},{0,1},30] (* _Harvey P. Dale_, Jan 23 2019 *) %o A093145 (Sage) [lucas_number1(n,10,20) for n in range(0, 21)] # _Zerinvary Lajos_, Apr 26 2009 %o A093145 (Magma) [n le 2 select n - 1 else 10*Self(n-1)-20*Self(n-2): n in [1..25]]; // _Vincenzo Librandi_, Dec 30 2012 %Y A093145 Cf. A000045, A091870. %K A093145 easy,nonn %O A093145 0,3 %A A093145 _Paul Barry_, Mar 26 2004