登录
A216448型
log(3)/log(2)生成的Lambda字。
4
0, 1, 2, 1, 2, 3, 2, 2, 3, 2, 3, 4, 3, 2, 3, 4, 3, 3, 4, 3, 4, 3, 3, 4, 3, 3, 5, 3, 3, 4, 3, 3, 5, 3, 3, 3, 5, 3, 3, 5, 3, 3, 3, 5, 3, 3, 5, 6, 5, 3, 3, 5, 3, 3, 5, 6, 5, 3, 3, 5, 6, 5, 3, 5, 6, 5, 3, 3, 5, 6, 5, 3, 5, 6, 5, 6, 5, 3, 5, 6, 5, 3, 5, 6, 5, 6, 5, 3, 5, 6, 5, 6, 5, 5, 6, 5, 6, 5, 3, 5, 6, 5, 6, 5, 5, 6
抵消
0,3
评论
Lambda单词是一个符号序列,它编码序列i+jt中的差异,其中t是无理的,1<t<2。
链接
Robert G.Wilson v,n=0..1000时的n,a(n)表
N.凯里,关于一类局部对称序列的右无限字Lambda Theta《莱克特音乐中的数学和计算》。公司注释。科学。第6726卷,施普林格,(2011),42-55。
N.凯里,Lambda单词:定义在无限字母表上的一类丰富单词《整数序列杂志》,第16卷(2013年),第13.3.4条。
数学
t=对数[2,3];
结束=100;
x=桌子[天花板[n*1/t],{n,0,end}];
y=表[上限[n*t],{n,0,结束}];
tot[p_,q_]:=总数[Take[x,p+1]]+(p*q)+总数[Take[y,q+1]]
行[r_]:=表[tot[n,r],{n,0,end-1}]
g=网格[表格[行[n],{n,0,整数部分[(结束-1)/t]}];
pos[n_]:=反向[位置[g,n][[1,范围[2,3]]-1]
d[n]:=(d[0]=0;op[m]:=位置[m+1]-位置[m];
绝对值[Total[ContinuedFraction[op[n][[1]]/op[n][2]]])
l=前缀[表[d[n],{n,1,249}],0]
(*诺曼·凯里2012年9月10日*)
关键词
非n
作者
诺曼·凯里2012年9月10日
状态
经核准的