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 A049808 #8 Nov 14 2012 10:12:23
%S A049808 1,1,1,2,3,4,5,6,8,9,11,12,15,17,19,21,25,26,30,32,36,39,44,46,51,54,
%T A049808 58,61,68,70,77,81,87,91,97,100,109,114,120,124,134,136,146,151,157,
%U A049808 163,174,178,189,194,202,208,221,226,236,242
%N A049808 a(n)=number of Farey fractions of order n that are <=1/4; cf. A049805.
%t A049808 Farey[n_] := Union[Flatten[Join[{0}, Table[a/b, {b, n}, {a, b}]]]]; f[n_] := Length@ Select[ Farey@ n, # <= 1/4 &]; Array[f, 56] (* _Robert G. Wilson v_, Nov 14 2012 *)
%Y A049808 Cf. A005728, A049806, A049807, A049809, A049810, A049811, A049812, A049813, A049814.
%K A049808 nonn
%O A049808 1,4
%A A049808 _Clark Kimberling_