%I#5 2012年3月30日18:57:40
%S 1,2,3,4,5,6,7,8,10,11,12,13,14,15,16,17,19,20,21,22,23,24,25,26,27,
%电话:29,30,31,32,33,34,35,36,38,39,40,41,42,43,44,45,46,48,49,50,51,52,53,
%U 54,55,57,58,59,60,61,62,63,64,65,67,68,69,70,71,72,73,74,76,77
%N(1/2)*sqrt(5)的Beatty序列;补充A194152。
%t r=平方[5]/2;
%t c[k_]:=楼层[k*r];
%t表[c[k],{k,1,90}](*A194151*)
%t s=5+2*平方[5];
%t d[k_]:=楼层[k*s];
%t表[d[k],{k,1,90}](*A194152*)
%Y参考A194152。
%K nonn公司
%O 1,2号机组
%A_Clark Kimberling_,2011年8月17日