OFFSET
1,3
COMMENTS
MATHEMATICA
f[n_]:=Fibonacci[n]; p[n_]:=PartitionsP[f[n]]; a[n_]:=Sum[p[i], {i, 1, n}];
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Dec 05 2008
STATUS
approved