登录
OEIS由
OEIS基金会的许多慷慨捐赠者
.
提示
(来自的问候
整数序列在线百科全书
!)
A097763号
集合{1,2,…,n}中分成偶数个块的不同分区数,以便每个块至少包含2个元素。
2
0、0、0、3、10、25、56、224、1506、9951、57992、315425、1761552、11022180、78474748、603715831、4771273414、38070877273、309146434240、2598546954268、22887194502518、2113886-90471531、2031261113410564、20121026325645745
(
列表
;
图表
;
参考
;
听
;
历史
;
文本
;
内部格式
)
抵消
1,4
评论
a(n)=
A000296号
(n)-
A097762号
(n) ●●●●。
链接
阿洛伊斯·海因茨,
n=1..500时的n,a(n)表
配方奶粉
指数生成函数:cosh(exp(x)-x-1)。
例子
a(6)=25,因为我们可以将一组六个元素划分为两个非单一块,大小为四加二(15路)或三加三(10路);
a(6)=15+10=25。
MAPLE公司
seq(coeff(级数(cosh(exp(x)-x-1),x=0,25),x^i)*i!,
i=1..24);
#第二个Maple项目:
使用(组合):
b: =proc(n,i,t)选项记忆`
如果`(n=0,t,
`如果`(i<2,0,加上(多项式(n,n-i*j,i$j)/j*
b(n-i*j,i-1,irem(t+j,2),j=0..n/i))
结束:
a: =n->b(n$2,1):
seq(a(n),n=1..30)#
阿洛伊斯·海因茨
2015年3月8日
数学
多项式[n_,k_List]:=n/
次数@@(k!);
b[n_,i_,t_]:=b[n,i,t]=如果[n==0,t,如果[i<2,0,和[多项式[n,连接[{n-i*j},数组[i&,j]]/j*
b[n-i*j,i-1,Mod[t+j,2],{j,0,n/i}]];
a[n]:=b[n,n,1];
表[a[n],{n,1,30}](*
Jean-François Alcover公司
2016年1月10日之后
阿洛伊斯·海因茨
*)
交叉参考
囊性纤维变性。
A000296号
,
A097762号
.
上下文中的序列:
A047667号
A192963号
A000247号
*
A034506号
A067988号
A297186号
相邻序列:
A097760号
A097761号
A097762号
*
A097764号
A097765号
A097766号
关键词
容易的
,
非n
作者
Isabel C.Lugo(izzycat(AT)gmail.com),2004年8月23日
状态
已批准
查找
|
欢迎光临
|
维基
|
注册
|
音乐
|
地块2
|
演示
|
索引
|
浏览
|
更多
|
网络摄像头
贡献新序列。
或评论
|
格式
|
样式表
|
变换
|
超级搜索
|
最近
OEIS社区
|
维护人
OEIS基金会。
许可协议、使用条款、隐私政策。
.
上次修改时间:2024年4月24日19:59 EDT。
包含371963个序列。
(在oeis4上运行。)