A205216 Number of partitions of n into parts having no 2 in ternary representation.

1, 1, 1, 2, 3, 3, 4, 5, 6, 8, 10, 11, 15, 19, 21, 25, 31, 35, 41, 48, 55, 64, 75, 84, 97, 112, 126, 143, 164, 183, 208, 236, 263, 295, 333, 369, 414, 464, 513, 573, 644, 709, 786, 877, 967, 1066, 1182, 1298, 1432, 1584, 1736, 1905, 2104, 2302, 2518, 2764

Offset

0,4

Links

Table of n, a(n) for n=0..55.

Example

a(10) = #{10, 9+1, 4+4+1+1, 4+3+3, 4+3+1+1+1, 4+6x1, 3+3+3+1, 3+3+1+1+1+1, 3+7x1, 10+1} = 10;
a(11) = #{10+1, 9+1+1, 4+4+3, 4+4+1+1+1, 4+3+3+1, 4+3+1+1+1+1, 4+7x1, 3+3+3+1+1, 3+3+5x1, 3+8x1, 11x1} = 11;
a(12) = #{12, 10+1+1, 9+3, 9+1+1+1, 4+4+4, 4+4+3+1, 4+4+1+1+1+1, 4+3+3+1+1, 4+3+5x1, 4+8x1, 3+3+3+3, 3+3+3+1+1+1, 3+3+6x1, 3+9x1, 12x1} = 15.

Prog

(Haskell)
a205216 = p $ tail a005836_list where
   p _ 0 = 1
   p ks'@(k:ks) m = if m < k then 0 else p ks' (m - k) + p ks m

Crossrefs

Cf. A205217, A007088, A005836.

Sequence in context: A153178 A118302 A355358 * A304885 A017853 A241518

Adjacent sequences: A205213 A205214 A205215 * A205217 A205218 A205219

Keyword

nonn,base

Author

Reinhard Zumkeller, Jan 25 2012

Status

approved