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 A082962 #30 Oct 19 2017 03:14:14 %S A082962 0,1,2,7,9,25,84,109,302,1015,1317,3649,12264,15913,44090,148183, %T A082962 192273,532729,1790460,2323189,6436838,21633703,28070541,77774785, %U A082962 261394896,339169681,939734258,3158372455,4098106713,11354585881,38161864356 %N A082962 Numerators of continued fraction convergents to (sqrt(37)-4)/3. %H A082962 Vincenzo Librandi, <a href="/A082962/b082962.txt">Table of n, a(n) for n = 0..200</a> %H A082962 <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 12, 0, 0, 1). %F A082962 Empirical g.f.: x*(1+2*x+7*x^2-3*x^3+x^4)/(1-12*x^3-x^6). - _Colin Barker_, Jan 04 2012 %t A082962 t = Join[{0}, Flatten[ Table[{1, 2, 3}, {12}]]]; Rest[ Table[ Numerator[ FromContinuedFraction[ Take[t, n]]], {n, 31}]] (* _Robert G. Wilson v_, Feb 12 2005 *) %t A082962 Numerator[Convergents [(Sqrt[37]-4)/3, 30]] (* _Vincenzo Librandi_, Feb 01 2014 *) %Y A082962 Denominators are A082975. %K A082962 nonn,frac,easy %O A082962 0,3 %A A082962 _Gary W. Adamson_, May 27 2003 %E A082962 Edited by _Don Reble_, Nov 04 2005 %E A082962 Prepended a(0)=0 from _Vincenzo Librandi_, Feb 01 2014