OFFSET
0,6
EXAMPLE
The a(1) = 1 through a(11) = 5 partitions:
(1) (2) (3) . (5) (6) (7) . (5,4) (10) (11)
(4,1) (4,2) (4,3) (8,1) (6,4) (7,4)
(4,4,1) (8,2) (8,3)
(9,1) (9,2)
(4,4,2) (4,4,3)
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], Count[#, _?SquareFreeQ]==1&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Dec 26 2024
STATUS
approved
