|
|
A147563型 |
| 不规则三角形,T(n,k)=[x^k]p(n,x),其中p(n、x)=4*Sum_{j=0..n}A008292年(n+1,j)*(x/2)^j*(1-x2)^(n-j),按行读取。 |
|
1
|
|
|
4, 4, 4, 4, -2, 4, 16, -8, 4, 44, -6, -16, 4, 4, 104, 84, -136, 34, 4, 228, 606, -584, -24, 102, -17, 4, 480, 2832, -1088, -2208, 1488, -248, 4, 988, 11122, 5536, -20840, 8896, 832, -992, 124, 4, 2008, 39772, 74296, -118190, -2144, 51952, -22112, 2764
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
0.1个
|
|
链接
|
|
|
配方奶粉
|
T(n,k)=系数[x^k](p(n,x)),其中p(n、x)=4*Sum_{j=0..n}A008292年(n+1,j)*(x/2)^j*(1-x2)^(n-j)。
T(n,k)=圆((-1/2)^(k-2)*和{j=0..k}(-1)^j*二项式(n-j,k-j)*A008292年(n+1,j+1))-G.C.格鲁贝尔2023年3月3日
|
|
例子
|
不规则三角形的开头为:
4;
4;
4, 4, -2;
4, 16, -8;
4, 44, -6, -16, 4;
4, 104, 84, -136, 34;
4, 228, 606, -584, -24, 102, -17;
4, 480, 2832, -1088, -2208, 1488, -248;
4, 988, 11122, 5536, -20840, 8896, 832, -992, 124;
4, 2008, 39772, 74296, -118190, -2144, 51952, -22112, 2764;
|
|
数学
|
(*第一个程序*)
n最大值:=15;
p[x_,n_]=(1-x)^(n+1)*PolyLog[-n,x]/x;
b=表[系数列表[p[x,n],x],{n,nmax+1}];
F[n_]:=系数列表[4*和[b[[n+1]][[m+1]]*(x/2)^(n-m)*(1-x/2)*m,{m,0,n}],x];
T[n_]:=如果[IntegerQ[F[n]],F[n],符号[F[n]]*Abs[Round[F[n--1/2]]];
表[T[n],{n,0,nmax}]//展平
(*第二个程序*)
A008292年[n_,k_]:=和[(-1)^j*(k-j)^n*二项式[n+1,j],{j,0,k}];
F[n_,k_]:=(-1/2)^(k-2)*总和[(-1)^j*二项式[n-j,k-j]*A008292年[n+1,j+1],{j,0,k}];
T[n_,k]:=If[InterQ[F[n,k]],F[n,k],符号[F[n,k]]*Abs[Round[F[n,k]-1/2]]];
表[T[n,k],{n,0,16},{k,0,2*Floor[n/2]}]//压扁(*G.C.格鲁贝尔,2023年3月3日*)
|
|
黄体脂酮素
|
(岩浆)
A008292年:=func<n,k|(&+[(-1)^j*二项式(n+1,j)*(k-j)^n:j in[0..k]])>;
T: =函数<n,k|(-1/2)^(k-2)*(&+[(-1)^j*二项式(n-j,k-j)*A008292年(n+1,j+1):[0..k]]中的j)>;
[楼层(T(n,k)):k in[0..2*楼层(n/2)],n in[0..16]]//G.C.格鲁贝尔2022年10月27日;2023年3月3日
(SageMath)
定义A008292年(n,k):返回和((-1)^j*二项式(n+1,j)*(k-j)^n,对于范围(k+1)中的j)
定义A147563型(n,k):返回楼层((-1/2)^(k-2)*总和((-1)^j*二项式(n-j,k-j)*A008292年(n+1,j+1),对于范围(k+1)中的j)
压扁([[A147563型(n,k)对于范围内的k(2*楼层(n/2)+1)]对于范围(16)内的n)#G.C.格鲁贝尔2022年10月27日;2023年3月3日
|
|
交叉参考
|
|
|
关键词
|
签名,标签
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|