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

Author

Mohammad K. Azarian, Sep 01 2006

Keywords

• nonn
• easy

Links

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

Crossrefs

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

Programs

Magma

C := ComplexField(); [Ceiling((Pi(C) - Exp(1))*Sqrt(n)): n in [0..50]]; // G. C. Greubel, Oct 28 2017

Mathematica

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

PARI

for(n=0,50, print1(ceil((Pi - exp(1))*sqrt(n)), ", ")) \\ G. C. Greubel, Oct 28 2017

Extensions

Offset corrected by Mohammad K. Azarian, Nov 20 2008

Offset changed to 0 by Georg Fischer, Sep 02 2022