%I#8 2012年11月14日10:12:29
%S 1,1,2,3,4,5,7,8,10,12,15,16,20,22,25,28,33,35,41,43,47,51,58,61,68,
%电话72,78,82,91,93103108115121129133145151159165178182196,
%电话:20221021823323825258269277294300
%N a(N)=N阶Farey分数小于等于1/3;参见A049805。
%t Farey[n_]:=并集[Flatten[Join[{0},Table[a/b,{b,n},{a,b}]];f[n_]:=长度@选择[Farey@n,#<=1/3&];数组[f,54](*_Robert G.Wilson v_,2012年11月14日*)
%Y参见A005728、A049806、A04980、A0498、A049 809、A049810、A049 811、A04981 2、A049 81 3、A049 8 14。
%K nonn公司
%氧1,3
%百灵鸟金伯利_
|