%I#8 2021年4月21日03:50:23
%S 1431451461471481491501511521531551571592232225,
%电话:231232233234235237238239240241242243244245246247,
%电话:248249250251253253252552562587259260262263264265
%N对k进行编号,使c(k,0)>c(k、1),其中c(k和d)=τ的基-2展开式的前k位中d的个数(黄金比率,(1+sqrt(5))/2)。
%C这个序列与A293752和A293754一起划分正整数。
%tz=300;u=N[GoldenRatio,z];d=实际数字[u,2][[1];
%t t[n_]:=取[d,n];c[0,n_]:=计数[t[n],0];c[1,n_]:=计数[t[n],1];
%t表[{n,c[0,n],c[1,n]},{n,1,100}]
%t u=选择[范围[z],c[0,#]==c[1,#]&](*A293752*)
%t u/2(*A293753*)
%t选择[范围[z],c[0],#]<c[1,#]&](*A293754*)
%t选择[范围[z],c[0],#]>c[1,#]&](*A293755*)
%Y参见A068432、A293752、A2193753、A29375%。
%K nonn,easy,基本
%O 1,1号机组
%百灵鸟金伯利,2017年10月18日
|