登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A323957型 正好有一个缺陷的n个元素上的缺陷(二进制)堆的数量。 2
0、1、2、9、28、90、360、1526、7616、32460、190800、947760、6382464、37065600、296524800、1812861600、15283107840、105015593280、1017540576000、7304720544000、74472335308800、629300251008000、7429184791142400、624173722039929600、746041213793075200 (列表;图表;参考;;历史;文本;内部格式)
偏移
1,3
评论
或者[n]的置换数p在{1,…,n}中正好有一个索引i,使得p(i)>p(floor(i/2))。
链接
阿洛伊斯·海因茨,n=1..215时的n,a(n)表
埃里克·魏斯坦的数学世界,
维基百科,二进制堆
例子
a(2)=1:12。
a(3)=2:213231。
a(4)=9:2413、3124、3214、3241、3412、3421、4123、4132、4213。
a(5)=28:25134、25143、35124、35142、35214、35241、42315、42351、43125、43152、43215、43251、43512、43521、45123、45132、45213、45231、45312、45321、52314、52341、52413、52431、53124、53142、53214、53241。
a(6)=90:362451,362541,436125,436215。。。,652314, 652413, 653124, 653214.
(示例使用max-heaps。)
MAPLE公司
b: =proc(u,o)选项记忆;局部n,g,l;n: =u+o;
如果n=0,则为1
否则g:=2^ilog2(n);l: =最小值(g-1,n-g/2);展开(
加法(加法(二项式(j-1,i)*二项式*
b(i,l-i)*b(j-1-i,n-l-j+i),i=0.分钟(j-1,l)),j=1..u)+
加法(加法(二项式(j-1,i)*二项式*
b(l-i,i)*b(n-l-j+i,j-1-i),i=0..分钟(j-1,l),j=1..o)*x)
fi(菲涅耳)
结束时间:
a: =n->系数(b(n,0),x,1):
seq(a(n),n=1..25);
数学
b[u_,o_]:=b[u,o]=模[{n=u+o,g,l},如果[n==0,1,
g=2^(长度[整数位数[n,2]]-1);
l=最小值[g-1,n-g/2];展开[
总和[二项式[j-1,i]*二项式[n-j,l-i]*
b[i,l-i]*b[j-1-i,n-l-j+i],{i,0,最小值[j-1,l]}],{j,1,u}]+
总和[二项式[j-1,i]*二项式[n-j,l-i]*
b[l-i,i]*b[n-l-j+i,j-1-i],{i,0,最小值[j-1,l]}],{j,1,o}]*x]];
a[n_]:=系数[b[n,0],x,1];
数组[a,25](*Jean-François Alcover公司2021年4月22日之后阿洛伊斯·海因茨*)
交叉参考
第k列=第1列,共列A306343.
囊性纤维变性。A056971号.
关键词
非n
作者
状态
已批准

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

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

上次修改时间:美国东部夏令时2024年5月5日18:56。包含372277个序列。(在oeis4上运行。)