OFFSET
1,2
COMMENTS
Indices of odd terms of A000140, submitted at the request of Alonso del Arte, Feb 27 2011.
MATHEMATICA
f[n_] := f[n] = Max@ CoefficientList[ Expand@ Product[ Sum[x^i, {i, 0, j}], {j, n - 1}], x]; Select[ Range@ 350, OddQ[ f@ #] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Feb 28 2011
STATUS
approved