%I#7 2012年3月30日18:57:28
%S 2,2,1,3,2,1,1,1,3,2,1,0,3,2,2,1,1,3,1,2,1,3,1,1,3,3,2,2,1,0,3,
%温度2,1,0,3,2,0,2,2,1,3,2,1,1,1,3,2,1,3,1,0,2,1,0,1,3,1,2,2,2,1,1,3,1,3,
%U 2,1,3,2,2,1,32,1,1,3,2,1,0,3,2,1,3,1,3,3,1,2,1,0,3,1,1,2,2,2,1,2,3,2,1,1,3,12,3,3,2,3,1,2,3,1,3
%N[(bn+c)r]-b[nr]-[cr],其中(r,b,c)=(sqrt(3),3,1)和[]=楼层。
%C写下a(n)=[(bn+C)r]-b[nr]-[cr]。如果r>0、b和c是满足b>=2和0<=c<=b-1的整数,则0<=a(n)<=b。序列a中0的位置很重要,1,2、…、,。。。,b.这些b+1位置序列包含正整数的分区。
%C示例:
%C(黄金比例,2,1):A190427-A190430
%C(平方(2),2,0):A190480-A190482
%C(平方码(2),2,1):A190483-A190486
%C(平方码(2),3.0):A190487-A190490
%C(平方码(2),3,1):A190491-A190495
%C(平方码(2),3,2):A190496-A190500
%C(平方码(2),4,C):A190544-A190566
%t r=平方米[3];b=3;c=1;
%t f[n_]:=楼层[(b*n+c)*r]-b*楼层[n*r]-楼层[c*r];
%t t=表格[f[n],{n,1200}](*A190683*)
%t压扁[位置[t,0]](*A190684*)
%t压扁[位置[t,1]](*A190685*)
%t压扁[位置[t,2](*A190686*)
%t压扁[位置[t,3]](*A190687*)
%Y参考A190684-A190687。
%K nonn公司
%O 1,1号机组
%A_Clark Kimberling_,2011年5月17日
|