A114094 Number of partitions of n into parts that are distinct mod 6.

1, 1, 2, 2, 3, 4, 5, 5, 8, 8, 10, 13, 14, 15, 21, 22, 24, 32, 31, 35, 46, 49, 49, 66, 60, 70, 91, 95, 90, 121, 106, 126, 168, 167, 153, 204, 175, 210, 294, 273, 245, 323, 274, 330, 492, 422, 374, 487, 411, 495

Offset

1,3

Links

Fausto A. C. Cariboni, Table of n, a(n) for n = 1..1000

Example

a(7)=5 because there are 5 such partitions of 7: {7}, {1,6}, {2,5}, {3,4}, {4,2,1}.

Mathematica

<< DiscreteMath`Combinatorica`; np[n_]:= Length@Select[Mod[ #, 6]& /@ Partitions[n], (Length@# != Length@Union@#)&]; lst = Array[np, 50]

Crossrefs

Sequence in context: A126442 A129306 A322077 * A179255 A332285 A324325

Adjacent sequences: A114091 A114092 A114093 * A114095 A114096 A114097

Keyword

nonn

Author

Giovanni Resta, Feb 06 2006

Status

approved