%I #21 Dec 13 2024 12:38:32
%S 0,1,1,4,9,9,16,25,36,36,49,64,64,81,100,100,121,144,169,169,196,225,
%T 225,256,289,324,324,361,400,400,441,484,484,529,576,625,625,676,729,
%U 729,784,841,900,900,961,1024,1024,1089,1156,1225,1225,1296,1369,1369,1444
%N Largest square <= binomial(n,2).
%H Harry J. Smith, <a href="/A065737/b065737.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A048760(binomial(n,2)).
%F a(n) = A061288(n-1)^2 = A000290(A061288(n-1)) for n>=2. - _Alois P. Heinz_, Nov 07 2024
%t Floor[Sqrt[#]]^2&/@Binomial[Range[50],2] (* _Harvey P. Dale_, Feb 28 2020 *)
%o (PARI) a(n) = { sqrtint(binomial(n, 2))^2 } \\ _Harry J. Smith_, Oct 28 2009
%Y Cf. A048760, A000217, A000290, A061288, A065730-A065741.
%K easy,nonn
%O 1,4
%A _Labos Elemer_, Nov 15 2001