login
A185597
a(n) = floor(n^(3/2) - n^(1/2)); complement of A185598.
2
0, 1, 3, 6, 8, 12, 15, 19, 24, 28, 33, 38, 43, 48, 54, 60, 65, 72, 78, 84, 91, 98, 105, 112, 120, 127, 135, 142, 150, 158, 167, 175, 183, 192, 201, 210, 218, 228, 237, 246, 256, 265, 275, 285, 295, 305, 315, 325, 336, 346, 357, 367, 378, 389, 400, 411, 422, 434, 445, 457, 468, 480, 492, 504, 515, 528, 540, 552, 564, 577
OFFSET
1,3
LINKS
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
Cf. A185598.
Sequence in context: A077024 A338722 A185549 * A082873 A182727 A220001
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jan 31 2011
STATUS
approved