OFFSET
0,4
COMMENTS
From Gus Wiseman, Jul 03 2019: (Start)
Also the number of antichains covering n vertices and having empty intersection (meaning there is no vertex in common to all the edges). For example, the a(3) = 5 antichains are:
{{3},{1,2}}
{{2},{1,3}}
{{1},{2,3}}
{{1},{2},{3}}
{{1,2},{1,3},{2,3}}
(End)
EXAMPLE
The a(3) = 5 antichains:
{{1,2,3}}
{{1,2},{1,3}}
{{1,2},{2,3}}
{{1,3},{2,3}}
{{1,2},{1,3},{2,3}}
MATHEMATICA
stableSets[u_, Q_]:=If[Length[u]==0, {{}}, With[{w=First[u]}, Join[stableSets[DeleteCases[u, w], Q], Prepend[#, w]&/@stableSets[DeleteCases[u, r_/; r==w||Q[r, w]||Q[w, r]], Q]]]];
Table[Length[Select[stableSets[Subsets[Range[n], {1, n}], SubsetQ], And[Union@@#==Range[n], #=={}||Intersection@@#=={}]&]], {n, 0, 5}] (* Gus Wiseman, Jul 03 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, May 23 2018
EXTENSIONS
a(9) from A307249 - Dmitry I. Ignatov, Nov 27 2023
STATUS
approved