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 A103128 #26 Nov 26 2020 22:01:02 %S A103128 1,1,2,2,3,3,3,3,4,4,4,4,5,5,5,5,5,5,6,6,6,6,6,6,7,7,7,7,7,7,7,7,8,8, %T A103128 8,8,8,8,8,8,9,9,9,9,9,9,9,9,9,9,10,10,10,10,10,10,10,10,10,10,11,11, %U A103128 11,11,11,11,11,11,11,11,11,11,12,12,12,12,12,12,12,12,12,12,12,12 %N A103128 a(n) = floor(sqrt(2n-1)). %C A103128 n appears 2 * ceiling(n/2) times. %H A103128 Reinhard Zumkeller, <a href="/A103128/b103128.txt">Table of n, a(n) for n = 1..10000</a> %F A103128 From _Robert Israel_, Sep 12 2016: (Start) %F A103128 a(n+1) = a(n)+1 for n in A007590, otherwise a(n+1) = a(n). %F A103128 G.f.: x*Theta3(x^2)/(2*(1-x)) + sqrt(x)*Theta2(x^2)/(2*(1-x)) - x/(2*(1-x)), where Theta2 and Theta3 are Jacobi Theta functions. (End) %p A103128 seq(floor(sqrt(2*n-1)), n=1..100); # _Robert Israel_, Sep 12 2016 %t A103128 Table[Floor[Sqrt[2n-1]],{n,100}] (* _Mohammad K. Azarian_, Jun 15 2016 *) %o A103128 (Haskell) %o A103128 a103128 = a000196 . (subtract 1) . (* 2) %o A103128 -- _Reinhard Zumkeller_, Feb 12 2012 %Y A103128 Cf. A172471, A000196, A005408, A007590. %K A103128 easy,nonn %O A103128 1,3 %A A103128 _Giovanni Teofilatto_, Mar 17 2005 %E A103128 Edited by _Franklin T. Adams-Watters_, Apr 20 2010 %E A103128 New name from _Wesley Ivan Hurt_, Nov 26 2020