OFFSET
0,8
EXAMPLE
The a(5) = 1 through a(12) = 7 partitions:
(32) . (43) (53) (54) (73) (74) (75)
(52) (332) (72) (433) (83) (543)
(322) (432) (532) (92) (552)
(522) (3322) (443) (732)
(3222) (533) (4332)
(542) (5322)
(722) (33222)
(3332)
(4322)
(5222)
(32222)
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], And@@PrimePowerQ/@#&&GCD@@#==1&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jul 28 2022
STATUS
approved