A135660 a(n) = ceiling(sqrt(n) - n^(1/3)).

0, 1, 1, 1, 1, 1, 1, 1, 1, 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, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5

Offset

1,10

Links

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

Mathematica

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

Prog

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

Crossrefs

Cf. A000196, A048766, A134914.

Sequence in context: A243113 A258198 A204562 * A163858 A236362 A133502

Adjacent sequences: A135657 A135658 A135659 * A135661 A135662 A135663

Keyword

nonn,easy

Author

Mohammad K. Azarian, Nov 25 2007

Extensions

Changed offset from 2 to 1 by Vincenzo Librandi, Feb 16 2013

Status

approved