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 A049812 #8 Nov 14 2012 10:11:53
%S A049812 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,
%T A049812 34,35,38,40,43,45,49,50,54,56,59,61,66,68,73,76,79,82,87,89,95,97,
%U A049812 101,104,110,112,117,120,125,129,136,138
%N A049812 a(n)=number of Farey fractions of order n that are <=1/8; cf. A049805.
%t A049812 Farey[n_] := Union[Flatten[Join[{0}, Table[a/b, {b, n}, {a, b}]]]]; f[n_] := Length@ Select[ Farey@ n, # <= 1/8 &]; Array[f, 60] (* _Robert G. Wilson v_, Nov 14 2012 *)
%Y A049812 Cf. A005728, A049806, A049807, A049808, A049809, A049810, A049811, A049813, A049814.
%K A049812 nonn
%O A049812 1,8
%A A049812 _Clark Kimberling_