OFFSET
0,2
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..10
FORMULA
MATHEMATICA
Table[Sum[Product[2^n -k, {k, 0, 2*r}]k^r/(2*r+1)!, {r, 0, 2^n -1}], {n, 0, 8}]
Table[2^(2^n -1)*Fibonacci[2^n], {n, 0, 8}] (* G. C. Greubel, Jan 14 2022 *)
PROG
(Sage) [2^(2^n -1)*lucas_number1(2^n, 1, -1) for n in (0..8)] # G. C. Greubel, Jan 14 2022
(Magma) [2^(2^n -1)*Fibonacci(2^n): n in [0..8]]; // G. C. Greubel, Jan 14 2022
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Mario Catalani (mario.catalani(AT)unito.it), May 22 2003
EXTENSIONS
The next term is too large to include.
Better description from Ralf Stephan, Aug 29 2004
STATUS
approved