A338554 Number of non-constant integer partitions of n whose parts have a common divisor > 1.
0, 0, 0, 0, 0, 0, 1, 0, 2, 1, 5, 0, 9, 0, 13, 6, 18, 0, 33, 0, 40, 14, 54, 0, 87, 5, 99, 27, 133, 0, 211, 0, 226, 55, 295, 18, 443, 0, 488, 100, 637, 0, 912, 0, 1000, 198, 1253, 0, 1775, 13, 1988, 296, 2434, 0, 3358, 59, 3728, 489, 4563, 0, 6241, 0, 6840, 814
Offset: 0
Keywords
Examples
The a(6) = 2 through a(15) = 6 partitions (empty columns indicated by dots, A = 10, B = 11, C = 12): (42) . (62) (63) (64) . (84) . (86) (96) (422) (82) (93) (A4) (A5) (442) (A2) (C2) (C3) (622) (633) (644) (663) (4222) (642) (662) (933) (822) (842) (6333) (4422) (A22) (6222) (4442) (42222) (6422) (8222) (44222) (62222) (422222)
Crossrefs
Programs
-
Mathematica
Table[Length[Select[IntegerPartitions[n],!SameQ@@#&&GCD@@#>1&]],{n,0,30}]