OFFSET
0,3
FORMULA
a(n) = A326496(n) + 1 for n > 1. - Andrew Howroyd, Aug 30 2019
EXAMPLE
The a(0) = 1 through a(9) = 5 subsets:
{} {1} {1} {1} {1} {1} {1} {1} {1} {1}
{2} {23} {23} {235} {235} {2357} {23578} {23578}
{34} {345} {256} {2567} {25678} {256789}
{3456} {34567} {345678} {345678}
{456789}
MATHEMATICA
fasmax[y_]:=Complement[y, Union@@(Most[Subsets[#]]&/@y)];
Table[Length[fasmax[Select[Subsets[Range[n]], Intersection[#, Divide@@@Select[Tuples[#, 2], UnsameQ@@#&&Divisible@@#&]]=={}&]]], {n, 0, 10}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jul 09 2019
EXTENSIONS
Terms a(16) and beyond from Andrew Howroyd, Aug 30 2019
STATUS
approved