The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A015746 Number of partitions of n into distinct parts, none being 4. 9

%I

%S 1,1,1,2,1,2,3,3,5,6,7,9,10,12,15,18,22,26,31,36,42,50,58,68,80,92,

%T 107,124,142,164,189,216,248,284,323,369,420,476,541,613,693,784,885,

%U 997,1123,1264,1419,1593,1787,2000,2239,2504,2795,3120,3479,3874,4313

%N Number of partitions of n into distinct parts, none being 4.

%H Vincenzo Librandi, <a href="/A015746/b015746.txt">Table of n, a(n) for n = 0..1000</a>

%F a(n) = A015739(n+4). - _Michel Marcus_, Feb 20 2014

%t CoefficientList[Series[Product[1+q^n, {n, 1, 60}]/(1+q^4), {q, 0, 60}], q]

%t Table[Count[Select[IntegerPartitions[n], DeleteDuplicates[#] == # &], x_ /; ! MemberQ[x, 4]], {n, 0, 56}] (* _Robert Price_, May 17 2020 *)

%Y Cf. A025147, A015744, A015745, A015750, A015753, A015754, A015755.

%K nonn

%O 0,4

%A _Clark Kimberling_

%E Corrected and extended by _Dean Hickerson_, Oct 10, 2001

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified May 10 03:11 EDT 2021. Contains 343747 sequences. (Running on oeis4.)