A152480 Products of PartitionsQ of Fibonacci numbers.

1, 1, 1, 1, 2, 6, 36, 648, 49248, 25214976, 160821116928, 27931733230288896, 356677116520963546939392, 1187172652051836115416531874086912, 5150511748819234946137723863013776583789903872

Offset

1,5

Links

Table of n, a(n) for n=1..15.

Mathematica

f[n_]:=Fibonacci[n]; q[n_]:=PartitionsQ[f[n]]; a[n_]:=Product[q[i], {i, 1, n}];

Crossrefs

Cf. A152477, A152478, A152479

Sequence in context: A078973 A208650 A374453 * A001660 A368139 A275904

Adjacent sequences: A152477 A152478 A152479 * A152481 A152482 A152483

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Dec 05 2008

Status

approved