A121902 - OEIS

%I #26 Sep 08 2022 08:45:27

%S 0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,

%T 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,

%U 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

%N a(n) = floor((Pi - e)*sqrt(n)).

%H Vincenzo Librandi, <a href="/A121902/b121902.txt">Table of n, a(n) for n = 0..999</a> [Offset shifted by _Georg Fischer_, Sep 02 2022]

%t Table[Floor[(Pi - E)*Sqrt[n]], {n, 0, 110}] (* _Vincenzo Librandi_, Feb 21 2013 *)

%o (PARI) for(n=0,50, print1(floor((Pi - exp(1))*sqrt(n)), ", ")) \\ _G. C. Greubel_, Oct 28 2017

%o (Magma) C<i> := ComplexField(); [Floor((Pi(C) - Exp(1))*Sqrt(n)): n in [0..50]]; // _G. C. Greubel_, Oct 28 2017

%Y Cf. A073244 (Pi-e), A121854, A121855, A121856, A121857, A121899, A121900, A121901.

%K nonn,easy

%O 0,24

%A _Mohammad K. Azarian_, Sep 01 2006

%E Offset corrected by _Mohammad K. Azarian_, Nov 20 2008

%E Offset changed to 0 by _Georg Fischer_, Sep 02 2022