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

 

徽标
提示
(来自的问候整数序列在线百科全书!)
A259776号 没有固定点的[n]置换p的数量A(n,k)和受k限制的元素位移:1<=|p(i)-i|<=k,方阵A(n、k),n>=0,k>=0。 11
1, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 2, 1, 0, 1, 0, 1, 2, 4, 0, 0, 1, 0, 1, 2, 9, 6, 1, 0, 1, 0, 1, 2, 9, 24, 13, 0, 0, 1, 0, 1, 2, 9, 44, 57, 24, 1, 0, 1, 0, 1, 2, 9, 44, 168, 140, 45, 0, 0, 1, 0, 1, 2, 9, 44, 265, 536, 376, 84, 1, 0 (列表;桌子;图表;参考;;历史;文本;内部格式)
抵消
0,19
评论
推测:列k>0具有阶线性递归(具有常数系数)=A005317号(k) =(2^k+C(2*k,k))/2-瓦茨拉夫·科特索维奇2015年7月7日
发件人瓦茨拉夫·科特索维奇2015年7月7日:(开始)对于k>1,A(n,k)~c(k)*d(k)^n
k c(k)d(k)
2 0.2840509026895102746628049030651... 1.8832035059135258641689474653620...
3 0.1678494211968692989590951622212... 2.6304414743928951523517253855770...
4 0.0973070675347403976445165510589... 3.3758288741377846847522960161445...
5 0.0552389982575367440330445172521... 4.1183824671958029895499633437571...
6 0.0309726120341077011398575643793... 4.8588208495640240252838055706997...
7 0.0172064353582683268003622374813... 5.5979905586951369718393573797927...
8 0.0094902135663231445267663712259... 6.3363450921766600853069060904417...
9 0.00520430877801650454166967632... 7.0741444217884608367707985...
10 0.0028405987031922... 7.811548995086...
(结束)
链接
阿洛伊斯·海因茨,反对角线n=0..36,平坦
配方奶粉
A(n,k)=和{j=0..k}A259784型(n,j)。
例子
方阵A(n,k)开始:
1, 1, 1, 1, 1, 1, 1, 1, ...
0, 0, 0, 0, 0, 0, 0, 0, ...
0, 1, 1, 1, 1, 1, 1, 1, ...
0, 0, 2, 2, 2, 2, 2, 2, ...
0, 1, 4, 9, 9, 9, 9, 9, ...
0, 0, 6, 24, 44, 44, 44, 44, ...
0, 1, 13, 57, 168, 265, 265, 265, ...
0, 0, 24, 140, 536, 1280, 1854, 1854, ...
MAPLE公司
b: =proc(n,s,k)选项记忆`if`(n=0,1,`if`(n+k in s,
b(n-1,(s减去{n+k})并`if`(n-k>1,{n-k-1},{}),k),
加法(`if`(j=n,0,b(n-1,(s减去{j})并集
`如果`(n-k>1,{n-k-1},{}),k)),j=s))
结束时间:
A: =(n,k)->`如果`(k=0,`如果'(n=0,1,0),b(n,{$max(1,n-k)..n},k)):
seq(seq(A(n,d-n),n=0..d),d=0..12);
数学
b[n_,s_,k_]:=b[n,s,k]=如果[n==0,1,如果[MemberQ[s,n+k],b[n-1,连接[s~补码~{n+k}]~并集~If[n-k>1,{n-k-1},{}],k],和[If[j==n,0,b[n-1,连接[s~补码[j}]~Union~如果[n-k>1,{n-k-1},{},k]],{j,s}]]];
A[n_,k_]:=如果[k==0,如果[n==0、1、0],b[n,范围[Max[1,n-k],n],k]];
表[A[n,d-n],{d,0,12},{n,0,d}]//压扁(*Jean-François Alcover公司,2017年3月29日,翻译自Maple*)
交叉参考
主对角线给出:A000166号.
囊性纤维变性。A259784型.
关键词
非n,
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月23日06:04。包含371906个序列。(在oeis4上运行。)