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 A136417 #21 Sep 08 2022 08:45:32 %S A136417 2,2,3,3,5,6,9,12,17,23,33,46,65,91,129,182,257,363,513,725,1025,1449, %T A136417 2049,2897,4097,5793,8193,11586,16385,23171,32769,46341,65537,92682, %U A136417 131073,185364,262145,370728,524289,741456,1048577,1482911,2097153 %N A136417 Number of squares <= 2^n. %H A136417 Vincenzo Librandi, <a href="/A136417/b136417.txt">Table of n, a(n) for n = 0..1000</a> %F A136417 a(n) = 1 + A017910(n). - _R. J. Mathar_, Apr 04 2008 %t A136417 1 + Floor[(Sqrt[2])^Range[0, 50]] (* _Vincenzo Librandi_, Aug 06 2014 *) %o A136417 (PARI) a(n) = for(k=0,2^(n+1),if(k^2 > 2^n, return(k))) %o A136417 vector(50, n, a(n-1)) \\ _Derek Orr_, Aug 05 2014 %o A136417 (Magma) [1+Floor(Sqrt(2^n)): n in [0..45]]; // _Vincenzo Librandi_, Aug 06 2014 %Y A136417 Cf. A000079. %K A136417 nonn %O A136417 0,1 %A A136417 _Giovanni Teofilatto_, Apr 01 2008 %E A136417 More terms from _R. J. Mathar_, Apr 04 2008