%I M1344 N0515 #42 Sep 08 2024 22:30:06
%S 0,1,2,5,8,11,14,18,22,27,31,36,41,46,52,58,64,70,76,82,89,96,103,110,
%T 117,125,132,140,148,156,164,172,181,189,198,207,216,225,234,243,252,
%U 262,272,281,291,301,311,322,332,343,353,364,374,385,396,407,419,430
%N a(n) = floor(n^(3/2)).
%D B. K. Agarwala and F. C. Auluck, Statistical mechanics and partitions into non-integral powers of integers, Proc. Camb. Phil. Soc., 47 (1951), 207-216.
%D N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H Christian G. Bower, <a href="/A000093/b000093.txt">Table of n, a(n) for n=0..500</a>
%H B. K. Agarwala and F. C. Auluck, <a href="/A000093/a000093.pdf">Statistical mechanics and partitions into non-integral powers of integers</a>, Proc. Camb. Phil. Soc., 47 (1951), 207-216. [Annotated scanned copy]
%F a(n) = A077121(n) - 1. [_Reinhard Zumkeller_, Oct 31 2009]
%F a(n) = floor(n*sqrt(n)). [_Arkadiusz Wesolowski_, Jun 01 2011]
%F a(n) = A000196(A000578(n)) = A074704(n)+n*A000196(n). [_Reinhard Zumkeller_, Jun 27 2011]
%p Digits := 100: A000093 := n->floor(evalf(n^(3/2)));
%t Table[ Floor[ Sqrt[n^3]], {n, 0, 60}]
%o (PARI) a(n)=if(n<0,0,sqrtint(n^3))
%o (Haskell)
%o a000093 = a000196 . a000578 -- _Reinhard Zumkeller_, Jul 11 2014
%o (Python)
%o from math import isqrt
%o def A000093(n): return isqrt(n**3) # _Chai Wah Wu_, Sep 08 2024
%Y Integer part of square root of n^k: A000196 (k=1), this sequence (k=3), A155013 (k=5), A155014 (k=7), A155015 (k=11), A155016 (k=13), A155018 (k=15), A155019 (k=17).
%Y Cf. A002821.
%Y Cf. A185549.
%K nonn,easy
%O 0,3
%A _N. J. A. Sloane_
%E More terms from _James A. Sellers_, May 04 2000