A135664 a(n) = ceiling(sqrt(n) - n^(1/5)).

0, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 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, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7

Offset

1,6

Links

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

Mathematica

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

Prog

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

Crossrefs

Cf. A000196, A048766, A134914, A135660, A135661, A135662, A135663.

Sequence in context: A085141 A082896 A079416 * A261585 A058318 A133878

Adjacent sequences: A135661 A135662 A135663 * A135665 A135666 A135667

Keyword

nonn,easy

Author

Mohammad K. Azarian, Nov 25 2007

Extensions

Offset corrected by Mohammad K. Azarian, Nov 19 2008

Status

approved