A185595 a(n) = floor(n^(3/2)) - floor(n^(1/2)); complement of A185596.

0, 1, 4, 6, 9, 12, 16, 20, 24, 28, 33, 38, 43, 49, 55, 60, 66, 72, 78, 85, 92, 99, 106, 113, 120, 127, 135, 143, 151, 159, 167, 176, 184, 193, 202, 210, 219, 228, 237, 246, 256, 266, 275, 285, 295, 305, 316, 326, 336, 346, 357, 367, 378, 389, 400, 412, 423, 434, 446, 457, 469, 481, 493, 504, 516, 528, 540, 552, 565, 577, 590, 602, 615, 628, 641, 654, 667, 680, 694, 707

Offset

1,3

Links

G. C. Greubel, Table of n, a(n) for n = 1..5000

Mathematica

Table[Floor[n^(3/2)]-Floor[n^(1/2)], {n, 1, 80}]

Prog

(PARI) for(n=1, 50, print1(floor(n^(3/2)) - floor(n^(1/2)), ", ")) \\ G. C. Greubel, Jul 08 2017

Crossrefs

Cf. A185596.

Sequence in context: A310667 A317538 A310668 * A310669 A310670 A088765

Adjacent sequences: A185592 A185593 A185594 * A185596 A185597 A185598

Keyword

nonn

Author

Clark Kimberling, Jan 31 2011

Status

approved