|
%I #18 Jul 30 2022 19:36:54
%S 0,1,9,25,64,121,225,361,529,729,1024,1296,1764,2209,2704,3364,4096,
%T 4900,5776,6889,7921,9216,10609,12100,13924,15625,17689,19600,21904,
%U 24336,26896,29929,32761,36100,39204,42849,46656,50625,54756,59536
%N Nearest integer square to n^3.
%F a(n) = if A077116(n) < A070929(n) then A065733(n) else A077115(n).
%F a(n) = A002821(n)^2. - _Chai Wah Wu_, Jul 30 2022
%e a(5)=121, as 121=11^2 is the nearest square to 125=5^3.
%t Table[Round[Sqrt[n^3]]^2, {n, 0, 39}] (* _Alonso del Arte_, Dec 07 2011, based on Artur Jasinski's program for A077119 *)
%o (Python)
%o from math import isqrt
%o def A077118(n): return ((m:=isqrt(k:=n**3))+int((k-m*(m+1)<<2)>=1))**2 # _Chai Wah Wu_, Jul 29 2022
%Y Cf. A000290, A000578, A002821, A077119, A077110.
%K nonn
%O 0,3
%A _Reinhard Zumkeller_, Oct 29 2002
|
