A135661 a(n) = floor(sqrt(n) - n^(1/3)).

0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4

Offset

1,24

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Table[Floor[n^(1/2) - n^(1/3)], {n, 100}] (* Vincenzo Librandi, Feb 18 2013 *)

Prog

(Magma) [Floor(n^(1/2)-n^(1/3)): n in [1..100]]; // Vincenzo Librandi, Feb 18 2013

Crossrefs

Cf. A000196, A048766, A134914, A135660.

Sequence in context: A062153 A217693 A204560 * A082998 A076620 A121900

Adjacent sequences: A135658 A135659 A135660 * A135662 A135663 A135664

Keyword

nonn,easy,changed

Author

Mohammad K. Azarian, Nov 25 2007

Extensions

Offset corrected by M. F. Hasler, Nov 17 2008

Status

approved