Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A038152
Beatty sequence for e^Pi.
2
23, 46, 69, 92, 115, 138, 161, 185, 208, 231, 254, 277, 300, 323, 347, 370, 393, 416, 439, 462, 485, 509, 532, 555, 578, 601, 624, 647, 671, 694, 717, 740, 763, 786, 809, 833, 856, 879, 902, 925, 948, 971, 995, 1018, 1041, 1064
OFFSET
1,1
FORMULA
a(n) = floor(n*e^Pi).
MAPLE
A038152:=n->floor(n*exp(Pi)): seq(A038152(n), n=1..100); # Wesley Ivan Hurt, Jan 21 2017
MATHEMATICA
Floor[Range[100]*E^Pi] (* Paolo Xausa, May 11 2024 *)
PROG
(PARI) a(n) = floor(n*exp(Pi)); \\ Michel Marcus, Sep 28 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
Corrected and extended by Carlos Alves, Nov 25 2006
STATUS
approved