%I#10 2022年6月25日10:01:42
%S 0,1,2,2,2,3,4,5,5,6,7,8,9,9,9,9,10,11,11,12,13,14,14,14,
%电话:14,15,16,16,16,17,18,19,19,19,20,21,22,23,23,23,23,24,25,26,26,26,
%U 27,28,29,29,20,29,39,30,31,31,51,31,32,33,34,34,35,36,37
%N在[1,N]中整数k的数目,使得{N*r+k*r}<{N*r-k*r{,其中{}=分数部分,r=sqrt(2)。
%t r=平方米[2];p[x_]:=分数部分[x];
%t u[n_,k_]:=如果[p[n*r+k*r]<=p[n*r-k*r]1,0]
%tv[n_,k_]:=如果[p[n*r+k*r]>p[n*r-k*r],1,0]
%t s[n]:=和[u[n,k],{k,1,n}]
%t[n_]:=总和[v[n,k],{k,1,n}]
%t表[s[n],{n,1100}](*A194815*)
%t表[t[n],{n,1100}](*A194816*)
%Y参考A002193、A194816和A194813。
%Y A327177的部分金额。
%K nonn公司
%氧1,3
%A_Clark Kimberling_,2011年9月3日