|
| |
|
| A035507号 |
| 反对偶读取的逆Stolarsky数组。 |
|
7
|
|
|
|
1, 2, 4, 3, 7, 12, 5, 9, 20, 33, 6, 14, 25, 54, 88, 8, 17, 38, 67, 143, 232, 10, 22, 46, 101, 177, 376, 609, 11, 27, 59, 122, 266, 465, 986, 1596, 13, 30, 72, 156, 321, 698, 1219, 2583, 4180, 15, 35, 80, 190, 410, 842, 1829, 3193, 6764, 10945, 16, 41, 93, 211, 499
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
评论
|
逆Stolarky阵列是由u（n）=floor（n*x+x+n+1-x/2）给出的序列u的离散度，其中x=（黄金比率）。有关分散度的讨论，请参见A191426号.
|
|
|
链接
|
C.金伯利，间隙和分散《美国数学学会学报》117（1993）313-321。
|
|
|
配方奶粉
|
逆Stolarsky数组第n行和第k列中的项有以下表达式：a（n，k）=F（2k-3）-1-c1（n）*F（2k-4）+c2（n）*F（2k-2），其中F是斐波那契数列；如果n=1，则c1（n）=1，如果n>1（逆Stolarsky阵列的第一列），则[（n-1）*tau]，并且c2（n）=c1（n）+1+楼层（（2*c1（n+1）*tau/2）（逆Stolarsky数组的第二列）。tau=（1+sqrt（5））/2和[]表示最近的整数函数C.罗纳尔多（aga_new_ac（AT）hotmail.com），2004年12月31日
此外，下列递推公式成立：a（n，k）=3*a（n、k-1）-a（n，k-2）+1，其中a（n；1）=c1（n），a（n！2）=c2（n）C.罗纳尔多（aga_new_ac（AT）hotmail.com），2004年12月31日
|
|
|
例子
|
数组的左上角：
1, 4, 12, 33, 88, 232, ...
2, 7, 20, 54, 143, 376, ...
3, 9, 25, 67, 177, 465, ...
5、14、38、101、266、698。。。
6, 17, 46, 122, 321, 842, ...
|
|
|
MAPLE公司
|
用（组合，fibonacci）：gold:=（1+sqrt（5））/2:c1:=n->分段（n<>1，圆形（（n-1）*gold），1）：c2:=n->c1（n）+地板（2*c1（n+1）*gold/2）+1：inv_stol:=（n，k）->fibonaci seq（inv_stol（n+1-k，k），k=1..n），n=1..11）；inv_stol2:=（n，k）->（1+c0（n）C.罗纳尔多，2004年12月31日
|
|
|
数学
|
（*程序生成递增序列f[n]*的补码的分散数组T）
r=40；r1=12；（*r=T的行数，r1=要显示的行数*）
c=40；c1=12；（*c=#列T，c1=#列显示*）
x=黄金比率；f[n_]：=楼层[n*x+x+n+1-x/2]（*f（n）是第1*列的补码）
墨西哥[列表]：=
NestWhile[#1+1&，1，Union[list][[#1]]<=#1&，1，
长度[Union[list]]]
rows={NestList[f，1，c]}；
Do[rows=Append[rows，NestList[f，mex[Flatten[rows]]，r]]，{r}]；
t[i_，j_]：=行[[i，j]]；（*数组T*）
表格形式[表格[t[i，j]，{i，1，10}，{j，1，10}]]
扁平[表[t[k，n-k+1]，{n，1，c1}，{k，1，n}]]
（*数组作为序列*）
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
扩展
|
更多来自C.Ronaldo（aga_new_ac（AT）hotmail.com）的条款，2004年12月31日
Mathematica程序、扩展示例和注释克拉克·金伯利2011年6月3日
|
|
|
状态
|
经核准的
|
| |
|
|
