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 A135296 #11 Oct 09 2016 15:48:27 %S A135296 7,3,2,2,3,6,112,7,3,2,2,3,6,56,8,3,2,2,3,5,37,8,3,2,2,3,5,28,9,4,2,2, %T A135296 3,5,22,10,4,2,2,2,5,18,11,4,2,2,2,4,16,12,4,2,2,2,4,14,14,4,2,2,2,4, %U A135296 12,16,4,2,2,2,4,11,18,5,2,2,2,4,10,22,5,3,2,2,4,9,28,5,3,2,2 %N A135296 A measure of quality (the higher the better) for the approximation to Pi by rationals A022853(n)/n. %H A135296 G. C. Greubel, <a href="/A135296/b135296.txt">Table of n, a(n) for n = 1..2500</a> %F A135296 a(n) = [1/|n*Pi-A022853(n)|]. %e A135296 a(7)=112 because [1/|7*Pi-22|] = [1/|-0.0088514|] = [112.976] = 112. %t A135296 a = {}; For[n = 1, n < 90, n++, AppendTo[a, Floor[1/(If[FractionalPart[n*Pi] > 1/2, Ceiling[n*Pi] - n*Pi, n*Pi - Floor[n*Pi]])]]]; a (* _Stefan Steinerberger_, Dec 05 2007 *) %Y A135296 Cf. A022853. %K A135296 nonn,look %O A135296 1,1 %A A135296 _Franz Vrabec_, Dec 04 2007 %E A135296 More terms from _Stefan Steinerberger_, Dec 05 2007