A372887 Number of integer partitions of n whose distinct parts are the binary indices of some prime number.
0, 0, 1, 1, 3, 3, 6, 8, 12, 14, 21, 29, 36, 48, 56, 74, 94, 123, 144, 195, 235, 301, 356, 456, 538, 679, 803, 997, 1189, 1467, 1716, 2103, 2488, 2968, 3517, 4185, 4907, 5834, 6850, 8032, 9459, 11073, 12933, 15130, 17652, 20480, 24011, 27851, 32344, 37520
Offset: 0
Keywords
Examples
The partition y = (4,3,1,1) has distinct parts {1,3,4}, which are the binary indices of 13, which is prime, so y is counted under a(9). The a(2) = 1 through a(9) = 14 partitions: (2) (21) (22) (221) (51) (331) (431) (3321) (31) (311) (222) (421) (521) (4221) (211) (2111) (321) (511) (2222) (4311) (2211) (2221) (3221) (5211) (3111) (3211) (3311) (22221) (21111) (22111) (4211) (32211) (31111) (5111) (33111) (211111) (22211) (42111) (32111) (51111) (221111) (222111) (311111) (321111) (2111111) (2211111) (3111111) (21111111)
Crossrefs
Programs
-
Mathematica
Table[Length[Select[IntegerPartitions[n], PrimeQ[Total[2^(Union[#]-1)]]&]],{n,0,30}]
Comments