登录
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号.
关键词
容易的,非n
作者
Isabel C.Lugo(izzycat(AT)gmail.com),2004年8月23日
状态
已批准

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月24日19:59 EDT。包含371963个序列。(在oeis4上运行。)