|
%I #21 Dec 23 2020 04:53:33
%S 1,0,1,1,2,2,3,4,4,5,7,8,9,10,9,12,16,18,20,21,20,23,31,36,36,37,39,
%T 44,54,64,68,65,63,74,85,99,112,106,105,121,144,164,173,166,161,178,
%U 221,252,254,254,254,272,327,372,375,368,376,405,475,552,568,536
%N Number of strict integer partitions of n into pairwise coprime parts.
%H Fausto A. C. Cariboni, <a href="/A305713/b305713.txt">Table of n, a(n) for n = 1..700</a>
%e The a(13) = 9 strict partitions are (7,6), (8,5), (9,4), (10,3), (11,2), (12,1), (7,5,1), (5,4,3,1), (7,3,2,1).
%t Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&CoprimeQ@@#&]],{n,30}]
%Y Cf. A000009, A051424, A078374, A302569, A302696, A302797, A303282, A303283, A318717, A318719.
%K nonn
%O 1,5
%A _Gus Wiseman_, Sep 01 2018
|
