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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A156608型 三角形T(n,k,m)=圆形(T(n,m)/(T(k,m)*T(n-k,m)),其中T(0,k,m)=1,其中T(n,k)=乘积_{j=1.n}A129862号(k+1,j),t(n,0)=n!,m=2,按行读取。 5
1, 1, 1, 1, -1, 1, 1, 1, 1, 1, 1, 1, -1, 1, 1, 1, -2, 2, 2, -2, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1, -1, 2, 2, -1, 1, 1, 1, -2, 2, 2, -4, 2, 2, -2, 1, 1, 1, 2, 2, 2, 2, 2, 2, 1, 1, 1, 1, -1, 2, 2, -1, 2, 2, -1, 1, 1 (列表;桌子;图表;参考;;历史;文本;内部格式)
抵消
0,17
评论
这个序列的最初定义是基于D_n型的Cartan矩阵,因此该矩阵在某种程度上是隐含的-N.J.A.斯隆,2021年6月25日
链接
配方奶粉
T(n,k,m)=圆形(T(n,m)/(T(k,mA129862号(k+1,j),t(n,0)=n!,m=2。
例子
三角形开始:
1;
1, 1;
1, -1, 1;
1, 1, 1, 1;
1, 1, -1, 1, 1;
1, -2, 2, 2, -2, 1;
1, 1, 2, 2, 2, 1, 1;
1,1,-1,2,2,-1,1,1;
1, -2, 2, 2, -4, 2, 2, -2, 1;
1, 1, 2, 2, 2, 2, 2, 2, 1, 1;
1, 1, -1, 2, 2, -1, 2, 2, -1, 1, 1;
数学
(*第一个程序*)
b[n_,k_,d_]:=如果[n==k,2,If[(k==d&&n==d-2)||(n==d&k==d-1),-1,If[k==n-1||k==n+1)&&n<=d-1&&k<=d-1,-1,0]];
M[d_]:=表[b[n,k,d],{n,d},{k,d}];
p[x_,n_]:=如果[n==0,1,特征多项式[M[n],x]];
f=表[p[x,n],{n,0,20}];
t[n_,k_]:=如果[k==0,n!,乘积[f[[j+1]],{j,n-1}]/.x->k+1;
T[n_,k_,m_]:=圆形[T[n,m]/(T[k,m]*T[n-k,m])];
表[T[n,k,2],{n,0,15},{k,0,n}]//扁平(*由修改G.C.格鲁贝尔2021年6月23日*)
(*第二个程序*)
f[n_,x_]:=f[n,x]=如果[n<2,(2-x)^n,(2-x)*LucasL[2*(n-1),Sqrt[-x]]];
t[n_,k_]:=t[n,k]=如果[k==0,n!,乘积[f[j,x],{j,n-1}]/.x->(k+1);
T[n_,k_,m_]:=T[n,k,m]=圆形[T[n,m]/(T[k,m]*T[n-k,m')];
表[T[n,k,2],{n,0,15},{k,0,n}]//展平(*G.C.格鲁贝尔2021年6月23日*)
黄体脂酮素
(鼠尾草)
@缓存函数
def f(n,x):return(2-x)^n if(n<2)else 2*(2-x)*sum(((n-1)/(2*n-j-2))*二项式(2*n-j-2,j)*(-x)^(n-j-1)for j in(0..n-1))
定义g(n,k):如果(k==0)else乘积(f(j,k+1)用于(1..n-1)中的j),则返回阶乘(n)
定义T(n,k,m):返回圆(g(n,m)/(g(k,m
压扁([[T(n,k,2)代表k in(0..n)]代表n in(0..15)])#G.C.格鲁贝尔2021年6月23日
交叉参考
囊性纤维变性。A129862号,A007318号(m=0),该序列(m=2),A156609型(m=3),A156610型(m=4),A156612号.
关键字
签名,表格
作者
罗杰·巴古拉2009年2月11日
扩展
编辑人G.C.格鲁贝尔2021年6月23日
状态
经核准的

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

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

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