OFFSET
1,2
COMMENTS
LINKS
Sean A. Irvine, Table of n, a(n) for n = 1..1000 (terms 1..529 from G. C. Gruebel).
K. Ono, Odd values of the partition function, Discrete Mathematics 169, 1997, pp. 263-268.
MAPLE
select(type, [seq(combinat:-numbpart(n), n=1..200)], odd); # Robert Israel, Nov 03 2015
MATHEMATICA
Select[PartitionsP[Range[50]], OddQ] (* Vladimir Reshetnikov, Nov 02 2015 *)
PROG
(PARI) for(n=1, 100, if((k=numbpart(n))%2==1, print1(k", "))) \\ Altug Alkan, Nov 02 2015
(Haskell)
a052003 n = a052003_list !! n
a052003_list = filter odd a000041_list
-- Reinhard Zumkeller, Nov 03 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Patrick De Geest, Nov 15 1999
STATUS
approved