|
| |
|
| A326077型 |
| {1..n}的最大本原子集数。 |
|
11
|
|
|
|
1, 1, 2, 2, 3, 3, 4, 4, 6, 7, 11, 11, 13, 13, 23, 24, 36, 36, 48, 48, 64, 66, 126, 126, 150, 151, 295, 363, 507, 507, 595, 595, 895, 903, 1787, 1788, 2076, 2076, 4132, 4148, 5396, 5396, 6644, 6644, 9740, 11172, 22300, 22300, 26140, 26141, 40733, 40773, 60333, 60333, 80781, 80783
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
评论
|
a（n）是{1，…，n}的最大本原子集的数目。这里，原语意味着子集中的任何元素都不能划分任何其他元素，而最大值意味着在保持两两不可分割的特性的同时，不能将任何元素添加到子集中-内森·麦克纽2020年8月10日
|
|
|
链接
|
|
|
|
例子
|
a（0）=1到a（9）=7组：
{} {1} {1} {1} {1} {1} {1} {1} {1} {1}
{2} {23} {23} {235} {235} {2357} {2357} {2357}
{34} {345} {345} {3457} {3457} {2579}
｛456｝｛4567｝｛3578｝｛3457｝
{4567} {3578}
{5678} {45679}
{56789}
|
|
|
数学
|
稳定Q[u_，Q_]：=！应用[Or，Outer[#1=！=#2&&Q[#1，#2]&，u，u，1]，{0，1}]；
fasmax[y_]：=补[y，并@@（大多数[子集[#]]&/@y）]；
表[Length[fasmax[Select[Subsets[Range[n]]，stableQ[#，Divisible]&]]，{n，0，10}]
|
|
|
黄体脂酮素
|
（PARI）
divset（n）={sumdiv（n，d，if（d<n，1<<d））}
a（n）={my（p=向量（n，k，divset（k）），d=0）；对于（i=1，#p，d=比特（d，p[i]））；
my（ismax（b）=我的（e=0）；forstep（k=#p，1，-1，if（bittest（b，k），e=bitor（e，p[k]）），if！比特（p[k]，b），返回（0））；1);
（（k，b）->如果（k>#p，ismax（b），my（f=！比特和（p[k]，b））；if（！f||位测试（d，k），self（）（k+1，b））+if（f，self\\安德鲁·霍罗伊德2019年8月30日
|
|
|
交叉参考
|
参见。A001055号,A051026号（所有基本子集），A067992号,A096827号,A143824号,A285572型,A285573型,A303362型,A305148型,A305149型,A316476型,A325861型,A326023型,A326082型.
|
|
|
关键字
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
