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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A343419型 不同集{p(i)-p(j)的数量:1<=i<=j<=n},其中p覆盖[n]的所有置换。 0
1, 1, 2, 4, 8, 12, 24, 34, 62, 88, 148, 208, 360, 466, 784, 1082, 1718, 2278, 3744, 4902, 7914, 10486, 16334, 21728 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,3
评论
对于n>1,a(n)是偶数。
链接
配方奶粉
a(n)<2+74*3^(n-6)。
a(n)<=2*a(n-1)(推测)。
例子
a(1)=1:[[0]]。
a(2)=2:[[-1,0],[0,1]]。
a(3)=4:[[-2,-1,0],[-2,-1,0,1],[-1,0,1,2],[0,1,2]]。
a(4)=8:[[-3,-2,-1,0],[-3,-2-,-1,0,1],[-3,-2,-1-,0-,1,2],[-2,-1,0-,1,1,2,3],[2,-1,0,1,3],[-30,-1,1,0,1,2],[1,0,3]。
a(5)=12:[-4,-3,-2,-1,0],[-4,-3,-2,-1,0,1],[-4,-3,-2,-1,0,2],[-4,-3,-2,-1,-1,0,1,2,3],[-4,-3,-2,-1,-1,0,1,0,1,0,1,3],[-3,-2,-1,0,1,2,3,4],[-3,-2,-1,0,2,4],[-4,-2,-1,0,1,2,3],[-2,-1,0,1,2,3,4],[-3,-1,0,1,2,3,4],[-1,0,1,2,3,4],[0,1,2,3,4]。
MAPLE公司
b: =程序选项记忆`如果`(s={},{{}},}seq(映射(x->
{seq(j-i,j=s)}联合x,b(s减去{i})[],i=s)
结束时间:
a: =n->nops(b({$1..n})):
seq(a(n),n=0..12)#阿洛伊斯·海因茨2021年4月15日
黄体脂酮素
(Python)
定义权限(pmt,开始,结束):
全局k
全局a_n
如果开始>=结束:
a=[]
对于范围(1,len(pmt))中的x:
对于范围(0,x+1)中的y:
a.追加(pmt[y]-pmt[x])
new_list=[]
对于a中的j:
如果j不在new_list中:
new_list.append(j)
new_list.sort()
k.append(新列表)
m=[]
对于以k为单位的ss:
如果ss不以m为单位:
m.附加(ss)
k=米
a_n=长度(m)
其他:
i=开始
对于范围内的num(开始,结束):
pmt[num],pmt[i]=pmt[i,pmt[num]
烫发(pmt,开始+1,结束)
pmt[num],pmt[i]=pmt[i,pmt[num]
N=1
为True时:
k=[]
a_n=0
pmt=[]
对于范围(0,N)内的p:
追加pmt.(p+1)
烫发(pmt,0,长度(pmt))
打印(“a(”,N,“)=”,a_N)
N=无+1
(Python)
从itertools导入排列
def a(n):返回len(排列(范围(1,n+1))中p的元组(排序(范围(n)中i的集合(p[i]-p[j],范围(i,n)中j的集合)))
打印([a(n)代表范围(10)中的n])#迈克尔·布拉尼基2021年4月17日
交叉参考
囊性纤维变性。A000142号.
关键字
非n,更多
作者
田宝华2021年4月15日
扩展
a(11)-a(16)来自阿洛伊斯·海因茨2021年4月15日
a(17)-a(23)来自伯特·多贝莱尔2021年4月21日
状态
经核准的

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

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

上次修改时间:2024年4月23日13:41 EDT。包含371914个序列。(在oeis4上运行。)