OFFSET
1,41
LINKS
Fausto A. C. Cariboni, Table of n, a(n) for n = 1..500
EXAMPLE
The a(67) = 10 strict integer partitions are
(45,12,10) (42,15,10) (40,15,12) (33,22,12) (28,21,18)
(36,15,10,6) (30,15,12,10) (28,21,12,6) (24,18,15,10)
(24,15,12,10,6).
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], And[UnsameQ@@#, GCD@@#==1, And@@(GCD[##]>1&)@@@Select[Tuples[#, 2], Less@@#&]]&]], {n, 50}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 02 2018
EXTENSIONS
a(71)-a(85) from Robert Price, Sep 08 2018
STATUS
approved