A347784 Number of compositions (ordered partitions) of n into at most 3 powers of 2.

1, 1, 2, 3, 5, 5, 6, 6, 5, 5, 8, 6, 6, 6, 6, 0, 5, 5, 8, 6, 8, 6, 6, 0, 6, 6, 6, 0, 6, 0, 0, 0, 5, 5, 8, 6, 8, 6, 6, 0, 8, 6, 6, 0, 6, 0, 0, 0, 6, 6, 6, 0, 6, 0, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 5, 5, 8, 6, 8, 6, 6, 0, 8, 6, 6, 0, 6, 0, 0, 0, 8, 6, 6, 0, 6, 0, 0, 0, 6

Offset

0,3

Links

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

Mathematica

Table[Length@Flatten[Permutations/@IntegerPartitions[n, 3, Select[Range@n, IntegerQ@Log2@#&]], 1], {n, 0, 100}] (* Giorgos Kalogeropoulos, Sep 13 2021 *)

Crossrefs

Cf. A000079, A023359, A151759, A347785, A347786, A347787.

Sequence in context: A348976 A169787 A165959 * A111164 A255347 A029910

Adjacent sequences: A347781 A347782 A347783 * A347785 A347786 A347787

Keyword

nonn

Author

Ilya Gutkovskiy, Sep 13 2021

Status

approved