A114703 a(2*n) = F(3*n)*F(3*n+2), a(2*n+1) = F(3*n+1)*F(3*n+2), where F = A000045.

0, 1, 10, 15, 168, 273, 3026, 4895, 54288, 87841, 974170, 1576239, 17480760, 28284465, 313679522, 507544127, 5628750624, 9107509825, 101003831722, 163427632719, 1812440220360, 2932589879121, 32522920134770, 52623190191455

Offset

0,3

Links

Robert Israel, Table of n, a(n) for n = 0..1593

Index entries for linear recurrences with constant coefficients, signature (0,17,0,17,0,-1).

Formula

G.f.: x*(1+10*x-2*x^2-2*x^3+x^4)/(1-17*x^2-17*x^4+x^6). - Robert Israel, Mar 29 2018

Maple

f:= gfun:-rectoproc({a(n)-17*a(n+2)-17*a(n+4)+a(n+6), seq(a(i) = [ 0, 1, 10, 15, 168, 273][i+1], i=0..5)}, a(n), remember):
map(f, [$0..40]); # Robert Israel, Mar 29 2018

Mathematica

F[0] = 0; F[1] = 1; F[n_] := F[n] = F[n - 1] + F[n - 2] a = Flatten[Table[{F[3*n]*F[3*n + 2], F[3*n + 1]*F[3*n + 2]}, {n, 0, 17}]]

Crossrefs

Cf. A000045.

Sequence in context: A166626 A238759 A278349 * A134515 A232608 A175335

Adjacent sequences: A114700 A114701 A114702 * A114704 A114705 A114706

Keyword

nonn

Author

Roger L. Bagula, Feb 21 2006

Extensions

Edited by N. J. A. Sloane, Feb 11 2007

Status

approved