%I#8 2012年11月14日10:11:53
%S 1,1,1,1,1,1,1,2,3,4,5,6,7,8,9,10,12,13,15,16,18,19,21,22,25,27,29,31,
%电话:34,35,38,40,43,45,49,50,54,56,59,61,66,68,73,76,79,82,87,89,95,97,
%电话:101104110112117120125129136138
%N a(N)=N阶Farey分数小于等于1/8;参见A049805。
%t Farey[n_]:=并集[Flatten[Join[{0},Table[a/b,{b,n},{a,b}]];f[n_]:=长度@选择[Farey@n,#<=1/8&];数组[f,60](*_Robert G.Wilson v_,2012年11月14日*)
%Y参见A005728、A049806、A04980 7、A0498、A049 809、A049 810、A049 81 1、A049813和A049814。
%K nonn公司
%O 1,8型
%百灵鸟金伯利_
|