A152479 Products of partition numbers of Fibonacci numbers.

1, 1, 1, 2, 6, 42, 924, 93324, 73912608, 909864204480, 410599878740916480, 20528320742539954765344000, 462721784193718931971550165554080000, 28136323479948516473366521258111350797954332320000

Offset

1,4

Links

Robert Israel, Table of n, a(n) for n = 1..24

Formula

a(n) = Prod_{1<=j<=n-1} A072214(j). - Robert Israel, Oct 20 2016

Maple

A072214:= [seq(combinat:-numbpart(combinat:-fibonacci(n)), n=1..20)]:
seq(mul(A072214[i], i=1..n-1), n=1..20); # Robert Israel, Oct 20 2016

Mathematica

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

Crossrefs

Cf. A000041, A000045, A072214.

Sequence in context: A374891 A326343 A276453 * A250309 A115961 A355042

Adjacent sequences: A152476 A152477 A152478 * A152480 A152481 A152482

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Dec 05 2008

Status

approved