OFFSET
1,3
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..5000
MAPLE
A185597 := proc(n) floor(sqrt(n)*(n-1)) ; end proc: # R. J. Mathar, Feb 01 2011
MATHEMATICA
Table[Floor[n^(3/2)-n^(1/2)], {n, 1, 120}]
PROG
(PARI) for(n=1, 50, print1(floor(n^(3/2)-n^(1/2)), ", ")) \\ G. C. Greubel, Jul 08 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jan 31 2011
STATUS
approved