A135662 a(n) = ceiling(sqrt(n) - n^(1/4)).

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

Offset

1,7

Links

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

Mathematica

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

Prog

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

Crossrefs

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

Sequence in context: A328499 A339183 A135665 * A111853 A111851 A111852

Adjacent sequences: A135659 A135660 A135661 * A135663 A135664 A135665

Keyword

nonn,easy

Author

Mohammad K. Azarian, Nov 25 2007

Extensions

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

Status

approved