A121900 a(n) = ceiling((Pi - e)*sqrt(n)).

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

Offset

0,7

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..999 [Offset shifted by Georg Fischer, Sep 02 2022]

Mathematica

Table[Ceiling[(Pi - E) Sqrt[n]], {n, 0, 110}] (* Vincenzo Librandi, Feb 21 2013 *)

Prog

(PARI) for(n=0, 50, print1(ceil((Pi - exp(1))*sqrt(n)), ", ")) \\ G. C. Greubel, Oct 28 2017
(Magma) C<i> := ComplexField(); [Ceiling((Pi(C) - Exp(1))*Sqrt(n)): n in [0..50]]; // G. C. Greubel, Oct 28 2017

Crossrefs

Cf. A073244 (Pi-e), A121854, A121855, A121856, A121857.

Sequence in context: A135661 A082998 A076620 * A333525 A377722 A373095

Adjacent sequences: A121897 A121898 A121899 * A121901 A121902 A121903

Keyword

nonn,easy

Author

Mohammad K. Azarian, Sep 01 2006

Extensions

Offset corrected by Mohammad K. Azarian, Nov 20 2008

Offset changed to 0 by Georg Fischer, Sep 02 2022

Status

approved