OFFSET
0,5
EXAMPLE
The a(1) = 1 through a(9) = 13 subsets:
{1} {12} {123} {123} {1235} {1235} {12357} {23457} {24567}
{134} {1345} {1256} {12567} {24567} {123578}
{234} {2345} {2345} {23457} {123578} {134567}
{2356} {23567} {125678} {134578}
{2456} {24567} {134567} {135678}
{13456} {134567} {134578} {145678}
{135678} {145789}
{145678} {234579}
{235678} {235678}
{235789}
{345789}
{356789}
{1256789}
MATHEMATICA
fasmax[y_]:=Complement[y, Union@@(Most[Subsets[#]]&/@y)];
Table[Length[fasmax[Select[Subsets[Range[n]], UnsameQ@@Divide@@@Subsets[#, {2}]&]]], {n, 0, 10}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Gus Wiseman, May 31 2019
STATUS
approved