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 A065014 #7 Mar 30 2012 17:30:36 %S A065014 3,2,11,5,27,10,51,17,83,26,123,37,171,50,227,65,291,82,363,101,443, %T A065014 122,531,145,627,170,731,197,843,226,963,257,1091,290,1227,325,1371, %U A065014 362,1523,401,1683,442,1851,485,2027,530,2211,577,2403,626,2603,677 %N A065014 Duplicate of A013945. %F A065014 G.f.: (x^5+3x^4-x^3+2x^2+2x+3)/(1-x^2)^3. %e A065014 a(3) = 11 because the continued fraction for the square root of 11 is 3, {3, 6}. %t A065014 a = Table[0, {70}]; Do[ b = First[ Last[ ContinuedFraction[ Sqrt[ n]]]]; If[ b < 71 && a[[b]] == 0, a[[b]] = n], {n, 2, 10^4} ]; a %K A065014 dead %O A065014 1,1 %A A065014 _Robert G. Wilson v_, Nov 01 2001