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 A027953 #23 Sep 08 2022 08:44:49 %S A027953 1,3,14,46,133,364,972,2567,6746,17690,46345,121368,317784,832011, %T A027953 2178278,5702854,14930317,39088132,102334116,267914255,701408690, %U A027953 1836311858,4807526929,12586268976,32951280048,86267571219,225851433662 %N A027953 a(0)=1, a(n) = Fibonacci(2n+4) - (2n+3). %H A027953 G. C. Greubel, <a href="/A027953/b027953.txt">Table of n, a(n) for n = 0..1000</a> %H A027953 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (5,-8,5,-1). %F A027953 a(n) = T(2n+1, n+1), T given by A027948. %F A027953 G.f.: (1-2*x+7*x^2-5*x^3+x^4)/((1-3*x+x^2)*(1-x)^2). - _Vladeta Jovovic_, Mar 27 2003 %F A027953 a(n) = Sum_{j=0..n} binomial(2*n-j+1, j+2), with a(0)=1. - _G. C. Greubel_, Sep 29 2019 %p A027953 with(combinat); seq(`if`(n=0,1, fibonacci(2*n+4) -(3 +2*n)), n=0..40); # _G. C. Greubel_, Sep 29 2019 %t A027953 Join[{1},Table[Fibonacci[2n+4]-(2n+3),{n,30}]] (* or *) LinearRecurrence[ {5,-8,5,-1},{1,3,14,46,133},30] (* _Harvey P. Dale_, Oct 04 2017 *) %o A027953 (PARI) vector(40, n, my(m=n-1); if(m==0, 1, fibonacci(2*m+4) -(3 +2*m)) ) \\ _G. C. Greubel_, Sep 29 2019 %o A027953 (Magma) [1] cat [Fibonacci(2*n+4) -(3 +2*n): n in [1..40]]; // _G. C. Greubel_, Sep 29 2019 %o A027953 (Sage) [1]+[fibonacci(2*n+4) -(3 +2*n) for n in (1..40)] # _G. C. Greubel_, Sep 29 2019 %o A027953 (GAP) Concatenation([1], List([1..40], n-> Fibonacci(2*n+4) -(3 +2*n) )); # _G. C. Greubel_, Sep 29 2019 %Y A027953 Cf. A000045, A027948. %K A027953 nonn %O A027953 0,2 %A A027953 _Clark Kimberling_ %E A027953 More terms from _Vladeta Jovovic_, Mar 27 2003