OFFSET
1,3
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..50
MATHEMATICA
m = 16;
egf = Exp[x^2/2]*Sum[2^Binomial[n, 2]*(x/Exp[x])^n/n!, {n, 0, m}];
A059167[n_] := SeriesCoefficient[egf, {x, 0, n}]*n!;
a[n_] := 2^(n(n-1)/2) - A059167[n];
Array[a, m] (* Jean-François Alcover, Feb 23 2019 *)
Table[Length[Select[Subsets[Subsets[Range[n], {2}]], Min@@Length/@Split[Sort[Join@@#]]==1&]], {n, 0, 5}] (* Gus Wiseman, Sep 11 2019 *)
CROSSREFS
Equal to row sums of A245796.
The covering case is A327227.
The connected case is A327362.
The generalization to set-systems is A327228.
BII-numbers of set-systems with minimum degree 1 are A327105.
KEYWORD
nonn
AUTHOR
Chai Wah Wu, Aug 01 2014
EXTENSIONS
a(9)-a(16) from Andrew Howroyd, Oct 26 2017
STATUS
approved