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

%I #3 Oct 19 2017 03:14:13

%S 0,1,1,5,144,514229,190392490709135,

%T 93202207781383214849429075266681969,

%U 8269366108663463411004717981412027167937978847386801205243459016220834185059487057696

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

%t 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}]

%Y Cf. A081323.

%K easy,nonn

%O 0,4

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

%E Corrected by _Don Reble_, Nov 20 2006