|
|
A285280型 |
| 反对偶读取的数组:T(m,n)=长度为n的多进制单词数,其循环相邻元素相差不超过2。 |
|
4
|
|
|
1, 3, 1, 9, 4, 1, 27, 14, 5, 1, 81, 46, 19, 6, 1, 243, 162, 65, 24, 7, 1, 729, 574, 247, 84, 29, 8, 1, 2187, 2042, 955, 332, 103, 34, 9, 1, 6561, 7270, 3733, 1336, 417, 122, 39, 10, 1, 19683, 25890, 14649, 5478, 1717, 502, 141, 44, 11, 1
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
3,2
|
|
评论
|
所有行都是系数恒定的线性递归。请参阅PARI脚本以获取生成函数。
|
|
链接
|
|
|
例子
|
表格开始(m>=3,n>=0):
1 3 9 27 81 243 729 2187 ...
1 4 14 46 162 574 2042 7270 ...
1 5 19 65 247 955 3733 14649 ...
1 6 24 84 332 1336 5478 22658 ...
1 7 29 103 417 1717 7229 30793 ...
1 8 34 122 502 2098 8980 38928 ...
1 9 39 141 587 2479 10731 47063 ...
1 10 44 160 672 2860 12482 55198 ...
|
|
数学
|
差异=2;m0=差异+1;mmax=12;
传输Gf[m_,u_,t_,v_,z_]:=数组[u,m].LinearSolve[IdentityMatrix[m]-z*数组[t,{m,m}],数组[v,m]]
行Gf[d_,m_,z_]:=1+z*总和[TransferGf[m,Boole[#==k]&,Boole[绝对值[#1-#2]<=d]&,布尔值[Abs[#-k]<=d]&,z],{k,1,m}];
行[m_]:=行[m]=系数列表[RowGf[diff,m,x]+O[x]^mmax,x];
T[m_/;m>=m0,n_/;n>=0]:=行[m][[n+1]];
|
|
黄体脂酮素
|
(PARI)
传输Gf(m,u,t,v,z)=向量(m,i,u(i);
行Gf(d,m,z)=1+z*总和(k=1,m,转移Gf(m,i->如果(i==k,1,0),(i,j)->abs(i-j)<=d,j->如果(abs(j-k)<=d,1,0),z));
对于(m=3,10,打印(第Gf行(2,m,x));
对于(m=3,10,v=Vec(第Gf(2,m,x)行+O(x^8));对于(n=1,长度(v),打印1(v[n],“,”);打印(););
|
|
交叉参考
|
第4-32行为A124805号,A124806号,A124807号,A124828号,A124843号,A124851号,A124852号,A124857号,A124858号,A124864号,A124892号-A124894号,A124898号,A124935号,A124947号,A124948号-A124958号,A124994号,A124998号.
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|