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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A302828型 反对角线读取的数组:T(n,k)=k*n节点上的非交叉路径集数,直至旋转和反射,每条路径正好有k个节点。 6
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 4, 2, 1, 1, 3, 21, 22, 3, 1, 1, 6, 111, 494, 201, 6, 1, 1, 10, 604, 9400, 18086, 2244, 12, 1, 1, 20, 3196, 157040, 1141055, 794696, 29096, 27, 1, 1, 36, 16528, 2342480, 55967596, 161927208, 38695548, 404064, 65, 1 (列表;桌子;图表;参考;;历史;文本;内部格式)
抵消
0,12
链接
安德鲁·霍罗伊德,n=0..1274时的n,a(n)表
例子
数组开始:
=======================================================
否|1 2 3 4 5 6
---+---------------------------------------------------
0 | 1 1 1 1 1 1 ...
1 | 1 1 1 2 3 6 ...
2 | 1 1 4 21 111 604 ...
3 | 1 2 22 494 9400 157040 ...
4 | 1 3 201 18086 1141055 55967596 ...
5 | 1 6 2244 794696 161927208 23276467936 ...
6 | 1 12 29096 38695548 25334545270 10673231900808 ...
...
数学
nmax=10;seq[n_,k_]:=模[{p,q,h,c},p=1+逆级数[x/(k*2^(k-3)*(1+x)^k)+O[x]^n,x];h=p/。x->x^2+O[x]^n;q=x*D[p,x]/p;c=积分[(p-1)/k+和[EulerPhi[d]*(q/.x->x^d+O[x]^n),{d,2,n}])/x,x]+如果[OddQ[k],0,2^(k/2-2)*x*h^(k/2)];如果[k==1,2/(1-x)+O[x]^n,3/2+c+如果[OddQ[k],h+x^2*2^;
清除[col];col[k_]:=col[k]=系数列表[seq[nmax,k],x];
T[n_,k_]:=列[k][[n+1]];
表[T[n-k,k],{n,0,nmax},{k,n,1,-1}]//扁平(*Jean-François Alcover公司,2018年7月4日,之后安德鲁·霍罗伊德*)
黄体脂酮素
(PARI)
seq(n,k)={给出k′柱的gf
my(p=1+serreverse(x/(k*2^(k-3)*(1+x)^k)+O(x*x^n));
my(h=subst(p,x,x^2+O(x*x^n)),q=x*导数(p)/p);
my(c=整数((p-1)/k+和(d=2,n,eulerphi(d)*subst(q,x,x^d+O(x*x^n)))/x)+if(k%2,0,2^(k/2-2)*x*h^(k/2)));
如果(k==1,2/(1-x)+O(x*x^n),3/2+c+如果;
}
Mat(向量(6,k,Col(序列(7,k)))
交叉参考
第2..4列为A006082号(n+1),A303330型,A303867型.
行n=1是A005418号(k-2)。
关键词
非n,
作者
安德鲁·霍罗伊德,2018年5月1日
状态
经核准的

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

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

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