This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A049810 #8 Nov 14 2012 10:12:08
%S A049810 1,1,1,1,1,2,3,4,5,6,7,8,10,11,13,14,16,17,20,22,24,26,29,30,34,36,39,
%T A049810 41,45,46,51,54,58,61,65,67,73,76,80,82,88,90,97,101,105,109,116,119,
%U A049810 126,129,135,139,147,150,158,162,168,173,182
%N A049810 a(n)=number of Farey fractions of order n that are <=1/6; cf. A049805.
%t A049810 Farey[n_] := Union[Flatten[Join[{0}, Table[a/b, {b, n}, {a, b}]]]]; f[n_] := Length@ Select[ Farey@ n, # <= 1/6 &]; Array[f, 59] (* _Robert G. Wilson v_, Nov 14 2012 *)
%Y A049810 Cf. A005728, A049806, A049807, A049808, A049809, A049811, A049812, A049813, A049814.
%K A049810 nonn
%O A049810 1,6
%A A049810 _Clark Kimberling_