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 A048760 #56 Feb 28 2025 18:52:38
%S A048760 0,1,1,1,4,4,4,4,4,9,9,9,9,9,9,9,16,16,16,16,16,16,16,16,16,25,25,25,
%T A048760 25,25,25,25,25,25,25,25,36,36,36,36,36,36,36,36,36,36,36,36,36,49,49,
%U A048760 49,49,49,49,49,49,49,49,49,49,49,49,49,64,64,64,64,64,64,64,64,64,64,64,64
%N A048760 Largest square <= n.
%H A048760 Reinhard Zumkeller, <a href="/A048760/b048760.txt">Table of n, a(n) for n = 0..10000</a>
%H A048760 Krassimir T. Atanassov, <a href="http://www.gallup.unm.edu/~smarandache/Atanassov-SomeProblems.pdf">On Some of Smarandache's Problems</a>, 1999.
%H A048760 Henry Bottomley, <a href="/A000196/a000196.gif">Illustration of A000196, A048760, A053186</a>.
%H A048760 Jose Castillo, <a href="http://fs.unm.edu/FUNCT2.TXT">Other Smarandache Type Functions: Inferior/Superior Smarandache f-part of x</a>, Smarandache Notions Journal, Vol. 10, No. 1-2-3 (1999), pp. 202-204.
%H A048760 Valentina V. Radeva and Krassimir T. Atanassov, <a href="http://nntdm.net/volume-04-1998/number-3/101-104/">On the 40-th and 41-st Smarandache's problems</a>, Notes on Number Theory and Discrete Mathematics, Vol. 4, No. 3 (1998), pp. 101-104.
%H A048760 Florentin Smarandache, <a href="http://www.gallup.unm.edu/~smarandache/OPNS.pdf">Only Problems, Not Solutions!</a>, 1993.
%H A048760 Michael Somos, <a href="/A073189/a073189.txt">Sequences used for indexing triangular or square arrays</a>.
%F A048760 a(n) = floor(n^(1/2))^2 = A000290(A000196(n)). - _Reinhard Zumkeller_, Feb 12 2012, Sep 03 2002
%F A048760 n^2 repeated (2n+1) times, n=0,1,... - _Zak Seidov_, Oct 25 2008
%F A048760 Sum_{n>=1} (1/a(n) - 1/n) = gamma + zeta(2) (= A345202). - _Amiram Eldar_, Jun 12 2021
%F A048760 Sum_{n>=1} 1/a(n)^2 = 2*zeta(3) + Pi^4/90. - _Amiram Eldar_, Aug 15 2022
%p A048760 A048760 := proc(n)
%p A048760 floor(sqrt(n)) ;
%p A048760 %^2 ;
%p A048760 end proc: # _R. J. Mathar_, May 19 2016
%t A048760 Array[Floor[Sqrt[#]]^2&,80,0] (* _Harvey P. Dale_, Mar 30 2012 *)
%t A048760 Table[PadRight[{},2n+1,n^2],{n,0,10}]//Flatten (* _Harvey P. Dale_, Feb 28 2025 *)
%o A048760 (Haskell)
%o A048760 a048760 = (^ 2) . a000196 -- _Reinhard Zumkeller_, Feb 12 2012
%o A048760 (PARI) a(n) = sqrtint(n)^2; \\ _Michel Marcus_, Jun 06 2015
%Y A048760 Cf. A000196, A000290, A048761, A345202.
%K A048760 nonn,easy,look
%O A048760 0,5
%A A048760 Charles T. Le (charlestle(AT)yahoo.com)