A027352 - OEIS

%I #10 Oct 03 2016 16:03:14

%S 0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,1,0,1,0,1,0,1,0,1,0,1,1,1,1,1,2,1,2,1,

%T 3,1,3,1,4,2,4,2,5,3,5,4,6,5,6,6,7,8,7,9,9,11,9,13,11,15,12,17,15,20,

%U 16,22,20,25,22,28,27,32,30,35,36,40,40,44,48

%N Number of partitions of n into distinct odd parts, the least being 7.

%p Nmax := 501 :

%p g := 1;

%p for e from 9 to Nmax by 2 do

%p     g := g*(1+x^e) ;

%p     g := taylor(%,x=0,Nmax+1) ;

%p     g := convert(%,polynom,x) ;

%p end do:

%p g := x^7+x^7*(g-1) :

%p g := taylor(g,x=0,Nmax) :

%p gfun[seriestolist](g) ; # _R. J. Mathar_, Oct 03 2016

%Y Cf. A027351, A027353.

%K nonn

%O 1,31

%A _Clark Kimberling_