|
| |
|
| A285281型 |
| 反对偶读取的数组：T（m，n）=长度为n的多进制单词数，其循环相邻元素相差不超过3。 |
|
4
|
|
|
|
1, 4, 1, 16, 5, 1, 64, 23, 6, 1, 256, 101, 30, 7, 1, 1024, 467, 138, 37, 8, 1, 4096, 2165, 694, 175, 44, 9, 1, 16384, 10055, 3526, 925, 212, 51, 10, 1, 65536, 46709, 18012, 4977, 1156, 249, 58, 11, 1, 262144, 216995, 92140, 27067, 6428, 1387, 286, 65, 12, 1
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
4,2
|
|
|
评论
|
所有行都是系数恒定的线性递归。请参阅PARI脚本以获取生成函数。
|
|
|
链接
|
|
|
|
例子
|
表格开始（m>=4，n>=0）：
1 4 16 64 256 1024 4096 16384 65536 ...
1 5 23 101 467 2165 10055 46709 216995 ...
1 6 30 138 694 3526 18012 92140 471566 ...
1 7 37 175 925 4977 27067 147777 808165 ...
1 8 44 212 1156 6428 36338 206942 1183164 ...
1 9 51 249 1387 7879 45663 267367 1575395 ...
1 10 58 286 1618 9330 54994 328058 1973026 ...
1 11 65 323 1849 10781 64325 388749 2371457 ...
1 12 72 360 2080 12232 73656 449440 2770016 ...
|
|
|
数学
|
差异=3；m0=差异+1；mmax=13；
传输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=4，12，打印（第Gf行（3，m，x））；
对于（m=4,12，v=Vec（第Gf行（3，m，x）+O（x^9））；对于（n=1，长度（v），打印1（v[n]，“，”）；打印（）；）；
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
