OFFSET
1,1
COMMENTS
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (0,8).
FORMULA
a(n) = (13 - 7*(-1)^n)*2^(1/4*(6*n - 11 + 3*(-1)^n)).
G.f.: x*(5 + 12*x)/(1 - 8*x^2).
MAPLE
seq(coeff(series( x*(5+12*x)/(1-8*x^2) , x, n+1), x, n), n=1..30); # G. C. Greubel, Apr 16 2020
MATHEMATICA
LinearRecurrence[{0, 8}, {5, 12}, 30] (* G. C. Greubel, Apr 16 2020 *)
PROG
(Magma) [ n le 2 select 7*n-2 else 8*Self(n-2): n in [1..26] ];
(SageMath) [(13 -7*(-1)^n)*2^((6*n -11 +3*(-1)^n)/4) for n in (1..30)] # G. C. Greubel, Apr 16 2020
(PARI) a(n)=([0, 1; 8, 0]^(n-1)*[5; 12])[1, 1] \\ Charles R Greathouse IV, May 20 2026
(PARI) a(n)=(13-7*(-1)^n)*2^(1/4*(6*n-11+3*(-1)^n)) \\ Charles R Greathouse IV, May 20 2026
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Klaus Brockhaus, Aug 24 2009
STATUS
approved
