A081322 F(P(n)), where F(n) = Fibonacci numbers A000045, P(n) = Pell numbers A000129.

0, 1, 1, 5, 144, 514229, 190392490709135, 93202207781383214849429075266681969, 8269366108663463411004717981412027167937978847386801205243459016220834185059487057696

Offset

0,4

Links

Table of n, a(n) for n=0..8.

Mathematica

f[n_] := f[n] = f[n - 1] + f[n - 2]; f[0] = 0; f[1] = 1; p[n_] := p[n] = 2p[n - 1] + p[n - 2]; p[0] = 0; p[1] = 1; Table[f[p[n]], {n, 0, 8}]

Crossrefs

Cf. A081323.

Sequence in context: A282836 A320414 A168041 * A232986 A322954 A254711

Adjacent sequences: A081319 A081320 A081321 * A081323 A081324 A081325

Keyword

easy,nonn

Author

Mario Catalani (mario.catalani(AT)unito.it), Mar 18 2003

Extensions

Corrected by Don Reble, Nov 20 2006

Status

approved