登录
A230002型
有理函数p(n,x-1/x)的分子多项式的系数数组,其中p(n、x)是由p(1,x)=1,p(2,x)=x,p(n)=x*p(n-1,x。
2
1, -1, 0, 1, 1, 0, -1, 0, 1, -1, 0, 1, 0, -1, 0, 1, 1, 0, -1, 0, 1, 0, -1, 0, 1, -1, 0, 1, 0, -1, 0, 1, 0, -1, 0, 1, 1, 0, -1, 0, 1, 0, -1, 0, 1, 0, -1, 0, 1, -1, 0, 1, 0, -1, 0, 1, 0, -1, 0, 1, 0, -1, 0, 1, 1, 0, -1, 0, 1, 0, -1, 0, 1, 0, -1, 0, 1, 0, -1, 0
抵消
0
评论
第n行有2n-1个术语。如果r是p(n,x)的零,则(1/2)(r+-sqrt(r^2+4)是q(n,x)的零。似乎是的签名版本A071028号.
例子
前5行:(1},(-1,0,1),(1,0,-1,0.1),(-1,1,0,0,-1,1,1)。
前5个多项式:1,-1+x^2,1-x^2+x^4,-1+x^2-x^4+x^6。
数学
p[n_,x_]:=p[x]=斐波那契[n,x];表[p[n,x],{n,1,10}]
f[n_,x_]:=f[n,x]=展开[Numerator[Factor[p[n,x]/。x->x+1/x]]]
g[n,x_]:=g[n,x]=展开[分子[因子[p[n,x]/。x->x-1/x]]]
h[n,x_]:=h[n,x]=展开[分子[因子[p[n,x]/。x->x+1+1/x]]]
t1=压扁[表[系数列表[f[n,x],{n,1,12}]];(*A229995型*)
t2=压扁[表[系数列表[g[n,x],x]、{n,1,12}]];(*A230002型*)
t3=扁平[表[系数列表[h[n,x],{n,1,12}]];(*A059317号*)
关键词
标签,签名,容易的
作者
克拉克·金伯利2013年11月7日
状态
经核准的