login
Indices of odd Kendall-Mann numbers (A000140).
1

%I #16 Mar 15 2014 04:11:18

%S 1,2,6,7,10,11,19,22,26,30,38,39,50,55,58,62,70,71,74,75,78,86,87,90,

%T 95,98,102,103,107,110,111,114,115,118,122,126,131,135,138,151,167,

%U 178,179,182,183,190,194,210,211,215,218,219,223,226,231,235,239,243,251,258,263,266,267,270,271,279,283,295,303,310,311,327,335,346

%N Indices of odd Kendall-Mann numbers (A000140).

%C Indices of odd terms of A000140, submitted at the request of _Alonso del Arte_, Feb 27 2011.

%t f[n_] := f[n] = Max@ CoefficientList[ Expand@ Product[ Sum[x^i, {i, 0, j}], {j, n - 1}], x]; Select[ Range@ 350, OddQ[ f@ #] &]

%Y Cf. A000140.

%K nonn

%O 1,2

%A _Robert G. Wilson v_, Feb 28 2011