OFFSET
0,4
COMMENTS
For example, the only choice of a different prime factor of each element of (4,5,6) is (2,5,3), so {4,5,6} is counted under a(6).
EXAMPLE
The a(0) = 0 through a(8) = 12 subsets:
. . {2} {3} {4} {5} {2,6} {7} {8}
{2,3} {3,4} {2,5} {3,6} {2,7} {3,8}
{3,5} {4,6} {3,7} {5,8}
{4,5} {2,5,6} {4,7} {6,8}
{2,3,5} {3,5,6} {5,7} {7,8}
{3,4,5} {4,5,6} {2,3,7} {3,5,8}
{2,5,7} {3,7,8}
{2,6,7} {5,6,8}
{3,4,7} {5,7,8}
{3,5,7} {6,7,8}
{3,6,7} {3,5,7,8}
{4,5,7} {5,6,7,8}
{4,6,7}
{2,3,5,7}
{2,5,6,7}
{3,4,5,7}
{3,5,6,7}
{4,5,6,7}
MATHEMATICA
Table[Length[Select[Subsets[Range[n]], MemberQ[#, n] && Length[Select[Tuples[If[#==1, {}, First/@FactorInteger[#]]&/@#], UnsameQ@@#&]]==1&]], {n, 0, 10}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Gus Wiseman, Feb 28 2024
STATUS
approved