|
| |
|
| A365073型 |
| 可以使用非负系数线性组合以获得n的{1..n}子集的数目。 |
|
27
|
|
|
|
1, 1, 3, 6, 14, 26, 60, 112, 244, 480, 992, 1944, 4048, 7936, 16176, 32320, 65088, 129504, 261248, 520448, 1046208, 2090240, 4186624, 8365696, 16766464, 33503744, 67064064, 134113280, 268347392, 536546816, 1073575936, 2146703360, 4294425600, 8588476416, 17178349568
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
链接
|
|
|
|
例子
|
子集{2,3,6}有7=2*2+1*3+0*6，因此在a（7）下计数。
a（1）=1到a（4）=14个子集：
{1} {1} {1} {1}
{2} {3} {2}
{1,2} {1,2} {4}
{1,3} {1,2}
{2,3} {1,3}
{1,2,3} {1,4}
{2,3}
{2,4}
{3,4}
{1,2,3}
{1,2,4}
{1,3,4}
{2,3,4}
{1,2,3,4}
|
|
|
数学
|
combs[n_，y_]：=使用[{s=表格[{k，i}，{k，y}，}i，0，Floor[n/k]}，选择[Tuples]，总计[Times@@@#]==n&]]；
表[Length[Select[Subsets[Range[n]]，combs[n，#]={}&]]，{n，0，5}]
|
|
|
黄体脂酮素
|
（PARI）
a（n）={
my（梳（k，b）=while（b>>k，b=比特（b，b>>k））；k*=2）；b） ；
my（递归（k，b）=
如果（位测试（b，0），2^（n+1-k），
如果（2*k>n，2^（n+1-k）-2^和（j=k，n，！位测试（b，j）），
self（）（k+1，b）+self（，k+1，comb（k，b）））；
递归（1,1<<n）
|
|
|
交叉参考
|
囊性纤维变性。A007865号,A088809型,A093971号,A151897号,A237668号,A308546型,A326020型,A364534型,A364839型,A365043型,A365381飞机.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
