OFFSET
0,4
COMMENTS
REFERENCES
David M. Burton, Elementary number theory, McGraw Hill (2002), page 286
FORMULA
a(n) = sum_{m=0.. floor[(n-1)/2]} A060187(n-m-1,m).
MATHEMATICA
p[x_, n_] = (1 - x)^(n + 1)*Sum[(2*k + 1)^n*x^k, {k, 0, Infinity}];
f[n_, m_] := CoefficientList[FullSimplify[ExpandAll[p[x, n]]], x][[m + 1]]
a[n_] := Sum[f[n - m - 1, m], {m, 0, Floor[(n - 1)/2]}]
Table[a[n], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, May 20 2010
EXTENSIONS
Exact definition moved to formula - the Assoc. Eds. of the OEIS, Aug 20 2010
STATUS
approved