%I#22 2023年11月20日11:39:40
%序号1,2,7,45500905325715111161244725343385694094565,
%电话9639771895398191918225261715541764452276876719,
%电话:2147773435840483131811857532329181437972165190492591258634595795046979484885130660888923790726013573808627152657407370145709692639213835100410554228497713291
%N点是{1..N}子集的拓扑数。
%H维基百科<a href=“https://en.wikipedia.org/wiki/Topological_space“>拓扑空间</a>
%F From _Geoffrey Critezer,2022年7月12日:(开始)
%F E.g.F.:exp(x)*A(exp(x)-1),其中A(x)是A001035的例如F。
%F a(n)=和{k=0..n}二项式(n,k)*A000798(k)。(结束)
%e a(0)=1到a(2)=7拓扑:
%e{{}}{{}{{{}
%e{{},{1}}{}、{1}
%e{{},{2}}
%e{{},{1,2}}
%e{{},{1},}
%e{{},{2},}
%电子{{},{1},},1,2}}
%t表[Length[Select[Subsets[Subsets[Range[n]],MemberQ[#,{}]&&SubsetQ[#、Union[Union@@Tuples[#,2],Intersection@@Tuples[#,2]]&]],{n,0,4}]
%t(*第二个程序:*)
%t A000798=案例[导入[“https://oeis.org/A000798/b000798.txt“,”表格“],{_,_}][[All,2]];
%t a[n_]:=和[二项式[n,k]*A000798[[k+1]],{k,0,n}];
%t a/@范围[0,长度[A000798]-1](*Jean-François Alcover_,2019年12月30日*)
%A000798的Y二项式变换(覆盖情况)。
%Y参见A001035、A001930、A003465、A014466、A102896、A102877、A306445、A326866、A326876。
%K非n
%0、2
%A _Gus Wiseman_,2019年7月30日